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PREFACE 


Part 1 of the JOVIAL Manual is an introduction for non-programmers 
entitled Computers, Programming Languages and JOVIAL. It was written 
20 December 1960 by C. J. Shaw and is designated TM-555, Part l. 

This document, Part 2, the JOVIAL Grammar and Lexicon, is a complete, 
concise, and rigorous description of JOVIAL (73). an SDC-designed, 
procedure-oriented programming language. It is intended primarily as 
a specification of the language and is not considered a training 


document. Three SDC publications on JOVIAL (J3) may be considered 
textbooks on the complete language: 


TM-555/003/00 by C. J. Shaw 26 December 1961 
The JOVIAL Manual, Part 3, The JOVIAL Primer, 216 pages. 


N-18652/000/00 by Sandra Peterson 24 July 1962 
JOVIAL Syllabus, 144 pages. 
This is an internal SDC document and is not 
appropriate for release outside the corporation, 


-TM-780/000/00 by Phyllis R. Kennedy 17 September 1962 
A Simplified Approach to JOVIAL (A Training Document), 
387 pages. 


There is also an introduction to JOVIAL in several parts which will 
help to carry the student of JOVIAL a considerable part of the way 
to an understanding of the complete language: 


TM~555/061/00 by M. H. Perstein 8 October 1962 
JOVIAL for the Dilettante, Part 1, 40 pages. 


TM-555/062/00 by M. H. Perstein 5 November 1962 
JOVIAL for the Dilettante, Part 2, 22 pages. 


TM-555/063/00 by M. H. Perstein 2 January 1963 
JOVIAL for the Dilettante and Beyond, 
SDC Comviler Error Detection Lists, 19 vages. 


When ordering any of these publications, the user should request all 
vertinent modifications. M-555/063/00, the Error Lists, is a handy 
booklet for all active J3 vrogrammers using SDC compilers. ‘Since the 
above vublications have appeared, new error messages nave been added 

and changes and clarifications to the lanruage have been anproved by 
comnizant committees and imrlemented by compiler maintenance prozrammers. 
This manual includes all chanzes anvroved to date. As new chances are 
implemented, modifications to this document will be issued. 
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This version of Part 2 is published in the hove of rendering the 
specification of the language more easily understood. It differs from 

the previous version principally in the following ways: a different _ 
metalanguage, omission of formal division into numbered forms, inclusion 

of a detailed index, fewer examples, changes of emphasis, and expanded | 
references to implementation. The references to implementation are 

included mainly to point out the meanings and uses of various elements 

of the language. These references also serve to remind the reader that 

it is necessary to consult supplementary documents concerning implementation 
by the compiler in which he is interested. 


The author gratefully acknowledges the help of the following people in 
critically reviewing a draft of this document: S&S. L. Arnold, C. Baum, 

E, R. Clark, V. L. Cohen, E. Hayes, J. S. Hopkins, C. W. Jackson, Jr., 

P, R. Kennedy, D. K. Oppenheim, and C. J. Shaw. Responsibility, however, 
for the format, contents, and any errors which may come to light rests — 
entirely with the author. 
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Chapter 1. Introduction 


eee Language and Metalanguage 


In attempting to define and describe programming languages it has 
been found convenient, perhaps necessary, to use some other language 
which is richer than the programming language, even richer than the 
programming language and English combined. Such a richer language 
is known as a metalanguage. 


This document describes JOVIAL in terms of a specially devised 
metalanguage, but one which is a simplification rather than an 
elaboration of others that have been used for describing programming 
languages. The author is interested in knowing if he has accurately 
gauged the needs of his readers. A short, one-page questionnair is 
included at the back of the book. Feedback, both negative and positive, 
will be appreciated. 


1.2 The Descriptive Metalanguage for JOVIAL 


The language of this document consists of JOVIAL symbols plus English 
plus other words and phrases plus numbers plus punctuation plus 
arrangement on the page plus diagrams. Certain elements of JOVIAL 
look just like the punctuation used with English, for instance the 
comma and the period which are parts of this sentence. No attempt is 
made to distinguish these classes formally, but context should provide 
the required distinctions, 


The "other words and phrases" will be distinguished from both 

JOVIAL words and English words by being typed in a special font 

called "script." An example, to be defined later, is "Letter," 

All such "other words" will be spelled like English words and will have 
similar, but not identical, meanings. For instance, "Letter" refers 

to an element of the JOVIAL alphabet while "letter" refers to an 
element of the English alphabet, 


Defining sentences, formulas, and lists will use capital letters 

and numerals, typed in elite, as specific instances of themselves 

in JOVIAL, und "other words and phrases," typed in script, as represen- 
tative members of classes of JOVIAL elements. English words (in elite 
and lower case with normal capitalization), such as "followed by" and 


f+ 
e 
NO 
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"or," will be used at times to indicate such things as order 


and alternatives, If punctuation is present: 


Le 7 In sentences, it is English and part of the sentence. 
an In formulas, it is JOVIAL and part of the expression. 


Punctuation may appear indiscriminantly in elite or script, with 
no meaning attached to the difference. 


Throughout the document there will be lists of alternative defining 
formulas and of examples. Some elements of lists will require more 
than one line. In order to distinguish the elements unequivocally 
they will be numbered at the left as in the previous paragraph. The 
number and its following period is never a part of the formula or 
example, a 


seript words or phrases written one after another, with one or more 
intervening spaces, indicate concatenation. For instance, the 
formula: 


a5 Letter letter 


means the same as Letter followed by Letter. In order to join such 
words together to form descriptive names for classes, a colon is placed 
between the words. If such a phrase begins on one line and continues 
on the next, the colon is repeated. For instance -- founal: input: 
sparameterz:£L4s4t, Such a phrase will never be broken within a word. 
Here are four examples of phrases (to be defined later) naming classes 
of JOVIAL structures: 


4, — fonmak: inputs parameter: 245t 

ae —— honamaks output: paraneter: L44t 
ion — actual: innut: paraneter: List 

ie actuak:output: parameter: List 


There will be script words or phrases, not explicitly defined, used in 
describing JOVIAL structures. These vhrases are derived by breaking up 
or putting together other phrases. The meanings will be obvious. For 
instance, it should be clear that the following four examples are four 
of the six possible combinations of the classes named in examples 

4, 5, 6, and 7, taken two at a time: 
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or Anyut: parameter: L14t 

9. output: parameter: List 
10. fovunak s parameter sLr4t 
qs actuak: parameter: L14t 


1.3 Programming Forms and Formats 


This document is not concerned with how a program gets into the 
computer. The coding form may be scanned by an optical reader or 

the manuscript may be transcribed to punched cards or tape. There 

may te columns reserved for identifying or numbering the cards. 

The programmer will probably have adopted some consistent and 
easy~to-read format. This manual, however, considers a JOVIAL mogram 
to be, from start to termination, a continuous stream of JOVIAL 44qns. 


oyntax ana Semantics -=- Illegal, Undefined, Ungrammatical, Compiler- 
Jependent | | | 


This manual makes no great distinction between syntax and semantics, It 
gives complete specifications, however, for writing legitimate JOVIAL 
prograns. In those instances when structure or meaning is described 

as compiler-dependent, the user must consult other documentation (or 
write it if he is building the compiler) to learn of further restrictions. 
Since information about JOVIAL compilers is available, this manual also 
telis about some deficiencies or pathologies in the compilers. 


For a migtam to be legitimate it must be meaningfully structured in 
accordance with the specifications in this manual, If the program 

or any vart of it fails to meet this requirement, it is of small concern 
whether it be called illegal, undefined, or ungrammatical,. 


Ali that this manual requires of a compiler is that it properly compile 
a legitimate program. A good compiler, however, will exhibit the 
Tollowing additional characteristics: 


Ls It will not stop prematurely nor go wild no matter how 
indigestible the supposed m10gtan, 


Ce It will give clues as to why the suvposed progiam is not 
a plo GAUUN 
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Such clues are usually called error messages. A good compiler 
can also be helpful by providing listings of information it has 
collected and organized concerning the piogram, 


Compilers will often not reject certain illegal or undefined structures, 
but compile them instead, giving results which the programmer considers 
appropriate, It is recommended that programmers avoid exploiting 

these quirks, since there is no guarantee that a new version of the 
compiler will exhibit the same eccentricities. 
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Chapter 2. Elements 


eel Introduction 


A phognam written in JOVIAL consists, basically, of 4tatenents and 
declarations. The statenents specify the computations to be performed 
with arbitrarily named data. There are both sxamnole:statements and 
comp£ex: statenents, which can be grouped together into compound: statements. 
Among the declarations are data:declarations and processing: declarations. 
The data:declarations name and describe the data on which the program 

is to operate, including inputs, intermediate results, and final results. 
The processing:deckarations generally contain Sstatenents and other 
declarations. They specify computations, but they differ from statements 
in that the computations must be performed only when the particular 
processing:decklaruation is specifically invoked by name. In addition to 
statements and declarations there are dinectives by means of which the 
compiler is caused to change its interpretation of certain structures 

in the program. The statements, declarations, and directives are 
composed of 4ymbols which are the words of the JOVIAL language. Trews 
AumboLs are in turn composed of the 4igns which comprise the JOVIAL 
alphabet. 


The general order in which the elements of a program have been introduced 
in the vreceding paragraph represents the general order in which one 
looks up definitions when trying to clear up a question. The definitions 
in this manual are introduced, however, in the opposite order. Such 
arrangements have led to complaints that one must "read the book 
backwards." This comment arises from the process of looking up a form 

in the table of contents, turning then to the late chapter where it is 
defined in terms of earlier defined forms. These, more elementary, 

forms are then found, via the table of contents, in an earlier chapter. 
And so forth. Nevertheless the document is arranged for the use of 

a reader rather than for reference. Difficult as this may be for reference 
use, the opposite arrangement would be much more difficult for a reader. 


An index has been included which will, hovefully, facilitate reference. 
The index should answer many auestions directly. It will carry one 
cuickly back through the chain of definitions until the question is 
answered or until the reader needs more details, to which he will be 
directed through the section numbers. 
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2.2 Spaces and Spaces 


There is no means in this manual, other than context, of distinguishing 
between a 4pace, an element of JOVIAL, and a space, an element of 
English and of our descriptive metalanguage. Rather than using a special 
character for one or the other, it was felt best to make explicit 
explanations where necessary. The first such explanation follows 
immediately. 


JOVIAL is written using 4umbols, the words of the language. The symbols 
are composed of 44gns, the elements of the JOVIAL alphabet. In general, 
Symbols do not contain spaces. The exceptions will be pointed out in 
sections 2.5 (comment) and 2.63 (hollertth: and transmission:code: 
:condstants). In general, 4ymbols are separated by 4paces. Again 

the exceptions will be noted (section 2.7), but, note here, these 
exceptions are permissive -- it is always correct to put 4pdaces 

between 4ymbols, except that it is never permitted to put a 4pdce after 
the + or - denoted by the word Signed (see section 2.61). 


In defining and explaining 44anéS and 4sumbols, any spaces included in 

the moval anguage formulas are not meant to be included in the definition. 
The vhrase "string of" implies that there are to be no 4paces between 
the elements strung together. Similarly, phrases such as "followed by," 
"enclosed in," and "separated by," imply that there are to be no spaces 
between the elements concerned. This is the situation (except where 
explicitly stated to be different) up to section 2.7. In sections 2.7 
and 2,8 the transition is noted and forms are explained that don't 

quite fit the new rule or the old one. 


In Chapter 3 and beyond, the opposite view is maintained with respect 
to Spaces. From there to the end of the book (except for the index) 
Apaces must come between all elements except where declared otherwise. 


In the index, neither rule holds. This is a question of detail which 
the index cannot answer directly. 


2.3 Stans, Elements of the JOVIAL Alphabet 
Sign means a Letter, a numeral or a mark, 


Letter means one of the twenty-six letters of the Fnglish alphabet, 
written in the form of a roman capital. 


Sumenak means one of the ten Arabic numerals Q, deg: Bie Se Ly a% 6, ce 8, 
or 9, 
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Octal:numerak means one of the following eight numerals: Dig ee Oe Se He 
Sa Oe, Ts 


Mank means one of the twelve marks, each associated with a name or 
names in parentheses, in the following list: 


1, + (nlus 2 4ian) 

2, - (minus: 44gn) 

ey * (star) 

4, j (slash) 

or (space, blank) — 

oy ‘ (pertod, decunak: pornt) 
(ee : (conma } 

Bs = (equals: 45ign) 

9. ( (Left: narenthes is ) 
16, ) (right: parenthesis) 
ae ' ( prune} 

12, $ (dollar: sign) 


2.4 Symboks, the Words of JOVIAL 


The Aymbols or words of the JOVIAL language are composed of strings of 
Sigs, in some cases a single 4ign. Most symbols do not contain spaces, 
In fact, Spaces serve to separate Symbols from one another. In the 
definitions of symbols the phrase, "enclosed in parentheses," means 
having a Lest:oarenthests on the left and a r7tght: parenthesis on the 
right without any intervening 4paces, 


Symbol means one of the following expressions: 


oe DUNE 2 

QO. constant 

3% Loop:vartable 
4, abbreviation 
oe nanie, 

oe Adeognram 

Te conment 


The above definition contains a categorical listing of all JOVIAL sumbots, 
but prunvtive and tdeogram have reference to the way these 4umbols are 
written rather than their use in contructing mograms. These two categories 
can be regrouped in ways that are more suggestive of their roles in the 
language, 


Those SuiboLs which are munttives or Adecarams include the categories in 
the following list, which is not exhaustive: 
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8. 
9. 
10. 
ll. 
12. 


14 


arctthmetic: operator 
relational: operator 
Logacal: averatonr 

sunctronal smodifrer 
bracket 
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2.5 Primitive, Name, Loop:variable, Abbreviation, Ideogram, Comment 


The following list exhibits all the pruntives of the JOVIAL 
language: 


Oe DAT Qual (FICATION 


+> 0PELATOR 


© ABS 
om eine 
+- AND 
a ARRAY 
% ASSIGN 
+ BEGIN 
© BIT 
O BYTE 
© CHAR 
¥ CLOSE 
% DEFINE 


% DIRECT | 


* END 
CENT 


OENTRY 
+ EQ 
FILE 
¥FOR 
“GOTO 

+ GO 

tT” GR 

AIF 

<I FEITH 
AINPUT 
AITEM 

¥JOVIAL 
OQ'rLoc 

T LQ 


LS 

& MANT 
© MODE 
© NENT 


+ NOT 
+ NQ 


© NWDSEN 
® ODD 
* OPEN 


+ OR 


SA ORIF 

* OUTPUT 

os OVERLAY 
Opos 


#% PROC 


*% "PROGRAM 


% RETURN 
* SHUT 

* START 
*STOP 

¥€ STRING 


_¥ SWITCH 


* TABLE 
dé TERM 
* TEST 


A primitive is a symbol consisting, usually, of two or more letters 


and having a specific meaning in the JOVIAL language. 


In the 


above list there are two primitives which begin with the prumre. 
This is in accordance with a policy of requiring the spelling of 
any new primitive added to the language to begin with this mark. 
The purpose is to avoid outlawing any previously written programs 
by preventing the possibility of the new prumtive being identical 


to any name. 


For the prunctives in the above list spelled with- 


out the prure an alternate form will be accepted in which a rune 


precedes the letifers. 


are prumtives with the same meaning: 


le 
a 


GOTO 


"GOTO 


For example, the following two symbols 


The following symbol, however, is not a OMAN LAVE; it may be used as _ 


a vwames 


3. 


LOC 


“A name is a string of two or more Letters, nunerals, and prunes with the 
following characteristics: 


ae, 
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Hg It is not identical to any prinitive. 

a It begins with (the leftmost sign is) a Letter. 
6. The rightmost 4ign is net a prune 

Te It does not contain two consecutive prunes, 


Loop:varzablLe. Any single etter can be used as a loop:vantable. It is 
the context in which it is used that characterizes it as a loopivaniable. 
A Loop:vartablLe is often called by other terms such as for-variable or 
Single letter subscript. 


Abbreviation. Several letters are used, standing alone, as abbreviations. 
The meaning of an abbreviation depends on context. Those letters which 
may be used as abbreviations will not be exhibited here, but will be shown 
and explained in connection with the forms in which they can occur. 


Ideogriam means a string of mazks having meaning in JOVIAL. Each of the 
twelve marks except the 4pace and the prune is also an tdeoqram, Following 
are listed the 20 JOVIAL ideognrans: 


+ *% 
* 7 
/ ate 
, ($ 
: $) 
= iy 


"Oo 


ON 
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Comment means two prunes followed by a string of 4igns followed by two 
primes. The string of 44qns between the two sets of doubled prunes 
may contain 4paces. It must not contain two prunes in succession; the 
last 44gn before the second set of two primes must not be a prune; 

and the string of 44gn4 must not contain $ except in the following two 
combinations: 


8. ($ 
9. $) 


2.6 Constant 


Before proceeding with the definition of constant it is necessary to 
define certain adjectives and adverbs which are used to denote attributes 
of constants, variables, files, functions, and certain other expressions. 


2.61 Adjectives Applying to JOVIAL 


Transmisstonicode means having values which are strings of 4igns, each 
Aign, if within a computer, being represented by a string of six bits 
(binary digits) in accordance with the. table of figure 1. In figure l, 
octal digits are used to represent patterns of three bits in accordance 
with the usual convention. 


Hollercth means having values which are strings of 4(gns, each 44gn, 

if within a computer, being represented in a manner dependent on the 

particular computer. In all present versions of JOVIAL, the internal 
holkernith representation uses six bits per 44gn. 


Integer, as a noun, means a numeric value which is represented as a 
whole number without a fractional part, but which is treated as if it 
had a fractional part with value zero to infinite precision. In this 
manual, vrecision means the number of bits to the right of the point in 
binary representations of numeric values. 


Integer as an adjective, means having the value of an Anteger. 
Staned means being preceded by + or - without any intervening 4pace4s. 


Faxed means having numeric values, within the computer, with a specific 
given or stated or understood degree of precision. If the precision is 
negative it means that the value is stated not even to the nearest 
unit. Fxxed does not mean immutable; hence we are led to such seeming 
incongruities as 44xed: variable, 
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Sign Code Sign Code 


Space $9 K ') 66 
# 61 L at 61 
# $2 M 2 62 
# $3 N 3 63 
# nn 0 = y 64 
# b5 P ff 5 65 
A g6 Q # 6 66 
B DT R $ t 67 
C 1g S * 8 7p 
D 11 T ( 9 71 
E 12 U # 72 
F 13 V # # (3 
G 1h W # / 74 
H 15 x # ‘ 75 
i 16 Y ‘ # 76 
J 17 Z # # 1 


# means there is no corresponding 44gn. 


Figure 1. Transmssion: code 
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Floating means having numeric values represented within the computer by 
two numbers. These two numbers are the signicand, which carries the 
Significant bits of the value, and the exrad, or exponent of the radix, 
which tells where the binary point is among the bits of the signicand or 
how far to right or left. A {floating value is equal to the signicand, 
multiplied by 2 raised to the power of the exrad. The number of bits in 
the signicand depends only on the particular computer involved. In this 
manual, significant bits means the bits in a computer representation of 
a number without consideration of the reliability of any of the bits. 


Octal means having values represented by octal:nmumenals and certain other 
4S4gns. The value may be considered as an integer or as a bit pattern 
depending on context. Octal applies only to JOVIAL structures which 

are in the nature of constants. 


Dual means having pairs of numeric values. Each member of the pair is 
known as a component. The two components must be represented in the 
same way, each being octal in the sense of integer, or each being 44xed 
with the same precision, or each being integer. © 


BooLean means having one of two possible values which might be thought 
of as "true and false," or "yes and no," etc., and which are represented 
by 1 and @ respectively. 


Status means having values which are, in essence, mnemonic labels. The 
representation, within a computer, of these values depends on context and 
not on the particular computer involved. 


Literal means transmission:code or hollertth or octal, 


Numeric means integer or fixed or floating or octak. In some other 
discussions of JOVIAL, numeric is defined to include dual, but, in the 
hope of making later explanations clearer, numeric here excludes duat, 


Having defined the above adjectives, it will now be possible to use and 
understand certain terms without explicit definition. For instance, if 
holkertth: constant, sLoating:constant, etc., are defined, the meaning 
of constant is clear. Similarly, if variable is defined, the meanings 
of status:vartable, bookean:varzable, etc., are clear. 


Dey 
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2,62 Optional, Optionatty, Number, Scale 


Optional means, with respect to the noun element to which it is 
applied, that the element may be present or absent. For example, 
ontional: siqned: numeral followed by Letter means one of the following 
three forms: 


os + nunerak Letter 
2. - numeral Letter 
3. Letter 


Optionally means, with respect to the adjective to which it applies, 
that the adjective may apply or not. For example, onticonally: signed: 
snumeral followed by Letter means one of the following three forms: 


4, + nuneral Letter 
5. axa nunenak Letter 
6. numeral Letter 


Number means a string of numerals, If a number stands alone as a 4yinbol 
it has the conventional integral constant value. 


Seale means a number in certain positions as indicated below. 
2.63 The Structure of Constants 


Integer:constant means a number, or a number followed by the Letter 

E followed by a écale. (The E stands for exrad.) An «nteger:constant 
is a JOVIAL symbol, It has a numeric value given, if there is no 
Scake present, by reading it as a mathematical symbol. If a scale 

is present, the value of the snteger:constant is the value of the 
number multiplied by 10 raised to the power given by the scale. 

For example, the following two «nteger:condstants have the same value: 


FLoating:constant means one of the six structures in the following list 
(as explained in section 2.2, Spaces are not permitted): 


3% nuunbenr . 

4, number . number 

ee » number 

or yuber . E ontsonaldu: siqned: scale 

ts. punber . numoer E ontionally:srgned:scate 
ar . number E ontsonallus signed: seate 


Cees 
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Examples of 4{Loating:constants: 


Te 3.14159 
or 56789.E<3 


Faxed:constant means a {loating:constant followed by the Letter A 
followed by an optionally:signed:seale. It is a symbok, Its © 

value is the value of the 4loating:constant part, curtailed perhaps 
because of the optionally: signed:scale following the A. This optionally: 
:signed:seale tells how many bits are to be retained after the point in 
a binary representation of the value. If the number of bits to be 
retained is negative, the meaning is that some of the least significant 
bits to the left of the binary point are to be truncated. On the 
following three lines are six {ixed:constants. Although the precision 
to be carried may be different, the values of the two 4<xedzconstants 
on each line are identical, being that given, ‘in Denny: by the third 
number on the line: 


9. 2A 2. 2hAd 19 
0% 4. PAW2 »6ELA=2 16¢ 
11; 2.25A2 2.375A2 © 16.91 


Octal: constant means the Letter 0 followed by a Left: parenthesis 
followed by a string of octal:nwnerals followed by a right: parenthes1s, 
Examples of octal:constants: 


seer 0( 26262). 
13. 0(12345676) 


The value of an octal:constant is Uiteral or nwneric depending on 
context. If Literal, the value is the pattern of bits represented, three 
bits per numeral, by the string of octal:numerals, If numeric, the value 
is the integer reuresented. in octal, by the string of octal:numerals, 


vuak: constant means one of the three structures in the following list: 


14, Dloptionally:siqned:inteaer:constant, optionally: signed: 
integer: constant) 

Ds Dloptionalky: signed: {ixed: constant, optionally: signed: 
:44xed: constant) 

16, Dioctak:constant, octaliconstant) 


203 
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In the form above in which each component is a 44xed:constant, the 
Scale after the A must be the same in each component. Examples of 


dual: constants: 


LT. D(27,-15) 
18, D(+1.739A10,-1 .492A16) 
19. D(O(TT7T) ,0( 4076) ) 


HollLercth: constant means a number followed by the Letter H followed by 

a Left: parenthesis followed by a string of 44gnS followed by a Atght: 
sparenthes1s. The value of the number mst correspond to the number of 
Signs vetween the narentheses. The value of a hollertth:constant is the | 
string of 44gns, represented within the computer in hollerith. The string 
of 44gns between the parentheses may include 4paces. Examples: 


20. O8H(ZHIS IS A HOLLERITH CONSTANT) 
Pics L7TH(SO IS THIS...+-)$) 


Transmsszon:code:constant means the same as hollercth: constant except 
that the H is replaced by T and the computer representation is in 
transmis s4onicode instead of hollercth. Example: 


22, 29T(THIS ONE IS TRANSMISSION CODE) | 


boolean: constant means the numeral g, which stands for "false," or the 
nunerat 1, which stands for "true." Boolean:condstants are distinguished 
from «nteaer:constants of the same form by context. 

Status:constant means either a Letter or a name enclosed in narentheses 
and preceded by the 2etter V. Following are three examples of 4fatus: 
sconstants: 


23% V(A) 
Pug V( POOR ) 
ON V(ALL'GONE ) 


The value of a status:constant depends entirely on context. In each 
context the status:constant will be associated with a status:cten:namne 
or with a Atlezname., The status:constants associated with each status: 
:ctem:nane or 4r4lernane must differ among themselves, but they need not 
be different from those associated with other status:itenznames or fle: 
sues. Indeed, the value of a Status:constant associated with one 
Atemzname may be different from the value of that same 4tatus:constant 
when associated with a different c<ten:name. Aside from the rules stated 
in this varagraph, the uniqueness of names and Loov:variabfles required 
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elsewhere does not apply to the interiors of status:constants. 


2. | Transition 


All the 4umbols of the JOVIAL language have now been explained, at least 
so far as their structure is concerned. Some meanings have also been 
explained, but others will be made clear only as the use of the 4:mbol in 
larger constructions is discussed. 


In chapter 3 and those that follow, such phrases as "string of," "followed 
by," "enclosed in," and "separated by" imply that spaces are permitted and 
may be required between the elements concerned. In writing a ptogrzam all 
the 4ymbols are to be separated by one or more 4paces except that, if the 
meaning is still clearly the same, a 4pace may be omitted. This means 
that, in general, 4paces are required between pruntives, names, | 
Loop:vartables, abbreviations, and constants; but not required between an 
Adeogrham and another 4ymbolL, Note that . is an ideogrxam when used as a 
period following a name in certain situations (sections 3.4 and 3.55, for 
example), but not when used as a decimal:point in writing constants 
(section 2.63). Similar remarks concerning + and - might be made, but no 
ambiguity results from disregarding such commentary. Examples: 


dl. CHANNEL'S EQ 
Ce BEGIN GOTO 
34 3E2 TE5 
4, IF ‘LOC 
De | P=Q+5$ 


There are exceptions to the general rule: (1) 4paces may be omitted between 
a prunitive or abbreviation and a following constant which begins with a 

decimak: point; (2) Spaces may be omitted between a constant which ends ina 
decimak:point and a following primitive which does not begin with E or A. 


Examples: 
O% BEGIN.S .6 1.3 2. END 
ie IF ALPHA EQ 7.0R.3¢2 LQ BETA LQ.9¢07$ 


In the metalanguage formulas to follow, a 4pac@ will appear between SunboLs 
wherever a 40aC@ is permitted or required. In examples, 4/nac@4 might not 
be shown if not required, | 


Of 
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A comment may replace any one or more of the string of Spaces between 
AymboLs without altering the meaning of the structure except in the 
case of a defane:directive, which is explained in the next section. 

A comment must not be used to replace a 4pace within a symbol such as 
a Literal:constant or another conment, 


A comment is only for the edification of a programmer reading a listing 
of the program, It has no effect upon the outcome of compilation. 


2.8 Define:dinective 


This structure is explained at this point because it fits neither 
rule concerning the use of Spaces and comments. 


Define:dinective means a structure of the following form: 
i, DEFINE name '' string of signs '' $ 


Among the 44gns between the first '' and the second '' shown above, 

there must not be another two prunes in succession; and the last sign 
before the second set of two prunes must not be a prime. Spaces, however, 
are permitted among the 44gné of the string. In fact, the string may 
consist of nothing more than a single 4pace. There must not be a 

comment between the name and the first '' symbol, 


The define:dinective is meaningful only if the quoted string of signs 

is actually a string of 4paces or else a string of 4ymbols, Its purpose 
is to permit a name to be used instead of the quoted string of symbols 
at subsequent points in the program, Wherever such a "defined" name 

is used it will be effectively replaced by the quoted string of 4umbols 
with the following exceptions: 


2% As part of a 4tatus:constant, 

36 As part of a Litenal:constant. 

4, As part of a comment, 

De Within dinrect:code other than within ditect:assigns, 


A name may be redefined by the use of another define:directive for the same 
yame at a subsequent point in the program, but it cannot be "undefined." 
That is, once a name has been given a definition for a particular mogtain 
there is no device or language structure whereby it may be returned 

to the pool of unused naines or to the usage it had before its first 
dejine:dinective. 


2.8 


16 March 1964 7 ek TM-555/002/02 


A defined name may be included among the 4imbols defining another name, 
effecting the implied replacement. Beyond the second such define: dinective 
the effect is the same regardless of the order in which pe Ctnect ives 

were written. 


The programmer must avoid sinéutlar definitione. 

Note that prunctives must not be redefined by the use of define:dinectives, 
Examples of define:dinrectives: 

DEFINE TO '',,,'' $ 

DEFINE GOOD ae 


DEFINE WORD '' '! 
DEFINE UNIT ''D(.707A8,.7A7A8)''$ 


O ON OW | 


2.8 
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Chapter 3. Statenents 


3.1 Introduction 


A JOVIAL program consists of a string of Statements and declarations 
which specify rules for performing computations with sets of data. 


The basic elements of data, called <tems, are named to distinguish one 
from another. Sometimes a name applies to a group of tte, requiring 
indexing to tell one member of the group from another. Several 

named groups may be subsumed under another group, which is known as a 
table and which may itself be named. The terms 4{1ing and aviay are 
used to characterize certain groups of <twns. For input and output 


purposes the basic elements are known as tecords, which are grouped 
into 422s, 


The values of <cems and other data can be changed in various ways. 

A data element whose value can be changed by means of an assignment: 
:statement is known as a vattable. There is one kind of element 
whose value can be changed, but not by means of an assignment: 
statement. This is the 4<2e:name which, in certain contexts, may 
be considered to be the name of an <tem which contains information 
about the condition of the 4ile. It is not considered a variable. 
Among the JOVIAL primitives are some, known as functional:modifiers, 
which can be applied to an <tem:nane, thereby designating only a part 
of the <ten to be considered, for the moment, as a vaiiable. Another 
functional:modi ster can be used to group the items of a table 
together, the group being then considered a single variable. 


The value to be given a vatiable is specified in an assignment: statement 
by means of a formula, which can be a constant, a variable, or a 
function. In the case of numeric: or dual: formulas, arithmetic 
combinations of formulas are also founulas, 


3.2 Variables 


Variables can be named and described in ttemdeclanrations which declare 
and describe itens of one kind or another. Declarations will be discussed 
in Chapter 4. They can describe these naned:varcables in terms of the 
adjectives defined previously and listed below: 
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ae DunsmsSL4on? code 
2. hoLlerith 

36 Anteger 

4, f4Xed 

De ALoating 

6. dual 

Te booLean 

8. Status 


The collective adjectives previously defined also apply. A literal: 
suartable means a hollercth:variable or a trhansmission:code:variable. A 
numneriazvarcable means an integer:variable, a fixed:variable, or a 
floating:variable. Named:variables can also be subdivided into 4sénnle: 
svartables and indexed:variables. 


3.21 Sample:variables 


SamplesvariabLe means the name of an item declared by an itemsdeclaratioii 
not associated with any aviay:declaration or any table:declaration. The 
adjectives which characterize the variable depend on the type description 
in the declaration. Exceptions will be explained later, wherein no 
declaration is required. Example of a sénplesvariables aa ac 


1. ALPHA 


3.22 Indexed:variablLes 


It now becomes necessary to introduce the notion of recursive definitions. 
We will define indexed:variable in terms including index. Index will be 
defined in terms of 4o4mlas which will be defined later in terms of 
vartables, including indexed:variables. This is not to be interpreted 

as circular definition with enigmatic meanings, but rather as a simple 
way of indicating how structures of any required complexity may be 

built up. 


An 4ndex means a numeric: formula or a string of numeric: forulas separated 
by commas. Each fornia in the string is known as a component. 


Indexed: variable means a structure of the following form: 
1 name ($ Andex $) 


where name is the nane of an appropriately declared cto. 


3422 
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If the 4ndex in the above structure has one component, it serves to 
specify a particular value from a one-dimensional table or MULALY 

of values. To pick a value from a two- or more-dimensional avuuy 
reauires a two- or more-component index. Each time an index is evaluated, 
each component must yield a positive value or zero. If the value is 

not an integer it will be truncated to an integer. Each component must 
also, of course, be small enough to specify an actual enttu of the 

table or aviay. Example of an indexed:variable: 


1 PAWN ($ RANK, FYLE $) 
3.23 Additional Variables 


As descriptions of variables, the terms floating, dual and status 
may only describe named:variables, that is, simple: or indexed: 
svarttables, The rest, terms such as hollertth, s«nteger, and 
boolean, however, may be applied to other variables which will be 
explained in the following sections. 


3.24 Integer:vartables 


Following is a list of the structures which, along with named:1ntegenr: 
variables, are also integer:variables: 


Ls Loop:varrable 

oe BIT. ($ Andex $) ( named:vartable  ) 
3 CHAR ( sLoating:vartable ) 

Ue POS ( frlername ) 

> an NENT ( name ) 


The four prunitives in the above list are known as functtonal:modrfrers. 
In the form with NENT, the name must be the name of a variable length 
table or of an <ten belonging to a variable length table. This varrabte 
designates the number of entiies of the indicated table. Values less than 
zero or more than the declared maximum are undefined. The value before 
being set, as by an assianment: statement, depends on the compiler. 


The sunctsonal:mod.j1er, POS, operating on a 4rlernaie, designates the 
position of the 42£e. The value @ corresponds to a vosition before the 
first tecord of the 442e, the position form which the first ’ecor 

may be read or written. For a 44fe of k Xecords, the value k corresronds 
to the position after the last 2ecord. The value of this varcuble 
changes when the 44€e@ is involved in input or output. If the value is 
changed, as by an assignment: statenent, the 44€e is repositioned 
accordingly, Values outside the range from # to k are, of course, 
undefined. 


3404 
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The sunctionalimodifier, CHAR, operating on a 4Loating:variable, 
designates the exrad of the variable, a negative, positive, or zero 
integer value, The term CHAR comes from the common practice of 

using "characteristic" in lieu of "exrad" by analogy between logarithms 
and floating numbers. 7 


The form with the functtonal:modifr1er, BIT, designates the unsigned 
integer value represented by the string of bits, or a segment of the 
string, used in the machine eneoding of the simple: or indexed: 
svartable. The number of bits in a named:variable is determined from 
its declaration. These bits are numbered from the left starting with 
zero. The index used with the BIT modif{zer may have two components, 
in which case the first component designates the first bit of the 
segment and the second component designates the number of bits in. 

the segment, It is required, of course, that these be compatible 
with the size of the ten and with the size of numeric values that 
the compiler is prepared to handle. The second component may have 
the value % in which case the value of the vatiable is %@. If only one 
bit is wanted a one-component index may be used, indicating which one. 


3.25 Fixed: variables 


The following structure, as well as the named: 4ixed:vartiable, is also 
a 4Axed:vartable: 


Te MANT ( fLoating:variablLe ) 

The sunctional:modifsier, MANT, operating on a 4loating: variable, 
designates the signicand of the variable, a signed, fixed, fractional — 
value. The term MANT comes from the common practice of using 
"mantissa" in lieu of "signicand" by analogy between logarithms and 
floating numbers. Example: 

oe MANT ( ALPHA ($ 3,5 $) ) 

3.26 Literal: variables 


The following structure, in addition to the named: Cteral: variable, 
is also a £ttenal:vanrtable: 


is BYTE ($ andex 3) ( naned:Literal:variable ) 


3626 
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The BYTE modijz4e2r functions in a manner entirely analogous to the 
operation of the BIT modijzer, The machine language representation 
of a named:Literal: variable is a string of bytes -= each byte itself 
a string of 6 bits representing a single 4iqgn. The bytes of an 
n-byte Literal:1tem are indexed from left to right from % through n-l. 
The one- or two-component index subscripting the BYTE modifier 
indicates a substring of the bytes representing the value of the 

Atom modified. The first component of the index indicates the 

initial byte of the substring. For a two-component index, the 

second component indicates the number of bytes in the substring. 

For a one component index, the length of the substring is implicitly 
one byte. The BYTE variable is defined only if the «ndex on 

the BYTE modifier indicates a substring of bytes within the byte range 
of the 4ten. The value of a byte-string of zero length is blanks. 

The BYTE varrablLe is hokkertth or transmcssion:code if the named: 
svartable is hollentth or thansmisdsion:code, respectively. Example: 


ae BYTE ($ I, 2 $) (MESSAGE ($ K $)) 
3.27 Boolean:variables 


Besides the named: boolean:variable, the following two structures are also 
boolean: variables: 


aR ODD ( Loopzvartable ) 

2% ODD ( named:nwneric:variable ) 

The fAunctional:modzs4rer ODD designates the value true when the least 
significant bit of the modified variable represents a magnitude of one, 
and false when it represents a magnitude of zero. ODD is true, therefore, 
when the absolute value of the modified variable, considered an integer 
regardless of the actual type or scaling, is odd; and false when that 
magnitude is even, 


3.28 Entry:variables 


A table, which will be discussed at greater length later, is an ordered 
set of entries, indexed from # through n-l for an n-entru table. Each 
entry is a set of related stwisb; related, perhaps, only by having been 
declared to comprise a single table. An entru:vartctable is an agglomeration 
of the values of the <te”s comprising an entry of a table. Its value 
denends on both the structure of the enttu and the values of the ctemn 
comvrisine the entry, This value mav be denoted by @ if all the bits in 
the entity have the value @. Otherwise there is no JOVIAL constant 

which can denote the value. Following are the two equivalent forms of the 
entrusvartmhdle: 


B4eD 


16 March 1964 | | 30 TM-555/002/02 


ul ENTRY ( name ($ $) 
2 ENT ( name ($ index $) ) 


in which the name is the name of a table or of one of the items 
of the table and the index consists of just one component, 
designating which entry. 


3.3 Formas 


Formulas are the means for expressing values. Hence variables and 
constants are also formulas, The adjectives which characterize variables 


may also be applied to formulas. An important kind of founla is the 
function, 


3.31 Functions 
A function means one of the following structures: 


13 functton:name = ( actual: input: parameter: List ) 
26  function:name (_ ) 


A function is also known as a function:call. Actual:input: parameter: Lut 
is explained in section 3.55 in connection with procedure:call: statements. 
Even if the actual:input: parameter: List is missing the parentheses are 
needed to identify the name as a function:name. The name refers to a 
function:declaration, described in section 5.6. The actual:parameters 
must conform to the honma: ynanrameters of the corresponding junction: 
sdeckaration in the same manner as explained for procedure:call: statements. 


A function has a value which is hollerith, floating, boolean, etc., and 
which derives from the computations specified in the function: declaration 
which defines it. Examples: 


3. RANDOM (_ ) 
k, COs ( ALPHA ) 
5. GRADE ( FINAL , MID + ( T1L+T2+T3 = ) / 2) 


3.32 Literal: fonnulas, Status: formulas, Entry: formulas 


A nokiercth: formula means one of the structures in the following list: 


oe octal: constant 

2. hokkerntth: constant 
34 holkerrth: variable. 
4, hollertth: function © 


See 


16 March 1964 31 TM=555/002/02 


A tnransmss4on: code: formula means one of the following expressions: 


Dis octal: constant 

6. transmsdsiLon: code: constant 
Ts Punsmission: code: variable 
8. transmis don: code: function 


A Status: formula means one of the expressions in the following list: 


9. status: constant 
10. status :varctablLe 
ii: 6tatus: function 


An entry: formla means one of the following two structures: 


le. 
13. entry: vartable 


The value of an entry:vartable in which all the bits are zeros may be 
denoted by @ in JOVIAL. No other value of an entty:variable may be 


denoted in any way in JOVIAL, hence the limited definition of entty: 
s formula, 


3.33 Numeric: formulas 


An arithnetic:onerator means one of the <deograms in the following list, © 
in which the meaning is given on the same line with each: 


1. + addition 

Oe - subtraction 

3. - multiplication 
4, / division 

De 4% exponentiation 


Recall that numeric means integer, fixed, floating, or octal. 
A nuneric: fouumla means one of the following structures: 


sage Ta 


6. numeric: constant \ 
7. numeric: vartable \ 
a. numeric: furction \ 
9. UWDSiy. ( name ) | 
10. NENT... ( name ) | 
pls ‘LOC. = (name) 
12, moc. ( name . ): 
133 ‘+ nuneric: forma 

1h, - numeric: sorntla 
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15. ( numericrfounla ) 

16. — (/- numeric:formla /) 

a ee ABS ( numeric: formla ) 

18, numeric: forumla arithnetic:operator numeric: nomnete 
19. numeric: foramla (* numeric:foumla *) 


A numeric: founla containing one or more arithmetic:operators specifies 
the value arising from the computations described by the formla, 

in the familiar sense as defined by the notation of ordinary algebra, 
with a few exceptions as noted herewith. The forms with (/ and /) and 
with ABS denote the absolute value of the enclosed forma, Exponentiation 
may be denoted by ** or by the (* and *) brackets, which, in the form 
given at the end of the above list, indicate the first formula raised to 
the power of the second, enclosed, formula, Multiplication, denoted by 
*, and exponentiation must be explicitly shown. The unary operator + 
may be used although it is redundant. The unary operator - means 
negation. Parentheses and the other brackets perform their usual 
grouping function. Within groups the order of operations is negations 
first, then exponentiations, then multiplications and divisions, then 
additions and subtractions. Within these categories operations are 
performed from left to right. 


Note that, since negation has high priority and subtraction low priority, 
the formulas listed at the left below have the values listed at the right: 


20. i 2 ee 2 3 
el. -3 #¥ 2-5 4 


Conversions between floating and integer or 44xed will be carried out 
automatically as required to perform the indicated operations. The exact 
order of such conversions and the scaling of intermediate results is 
dependent on the compiler, which will take into account the characteristics 
of the target computer and, possibly, the use of the formula within the 
program, Division by zero is undefined, as is an exponentiation such as 
(-2)**,5 which would result in a complex root being taken. 


In the forms with NWDSEN and NENT the name must be a table:name or the 
name of an tem belonging to a table, NWDSEN indicates the number of 
words per entry of the referenced table, aconstant integer value. NENT 
indicates the number of entries of the referenced table, another integer. 
As mentioned previously, the application of NENT to a variable:Length: 
stable yields an integer:variable. If the table is of rigid length, 

the use of NENT yields a formula, a constant integer value, but not a 
varrable, 
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In the forms using 'LOC the name must be a prognaniname, a statement: name, 
a table:name, or an iten:name, The 4étatement:name or program: name must be 
followed by a pertod; the tablez:name or cteuntname must not. The value of 
the "LOC formula is a non-negative integer eoual to the machine address of 
the core location containing 
the samplLesiten or 
the first word of the sunple:cten 
or of the table 
or of the named: statenent 
or of the ptogram 
or of the first compiler-assigned occurrence of 
the table:rten or of 
the 4t2ing:item or of 
the aviay:4temn, 


The specified location is not that of any associated control register 
which may precede the «ton, table, ariay, or program. 


Examples of numeric: founulas: 


22, ALPHA + BETA 

23. GAMMA / (DELTA ($ I, J $) ** (/XX - YY/) ) 

2k, ~EPSILON (* SIN (PHI ** 2) *#2 = COS (PHI ** 2) ¥#0#) 
25. ('LOC( ZETA) + NENT(TBL) * NWDSEN(TBL) )/2 


3.34 Dual: formulas 


A dual: formula means one of the following expressions: 


1% | numeric: foumnla 

2% dual: constant 

3% dual: variable 

h, dual: function 

or + dual: formula 

6. - dual: formula 

es ( dual: foramla } 

S. (/ dualzforma /) 

9. ABS ( duasfornula } 

10s dual: formula uithnetios operator aca fonmula 
as dual: foumla (* dualifonmula *) 


Arithmetic:operators, ABS, parentheses, and other brackets have the 
same meanings with respect to dual:s4orumulas as they have with respect 
to numeric: soumulas. A set of computations with dual values is carried 
out as the indicated set of computations with all the left components 
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performed in parallel with the same set of computations on the right 
components. When necessary a nmwnetic value is "twinned" to convert 

it into a dual value so that it can partake in computations with other 
duak values. There is no inverse conversion method for turning dual 
values into nwnertc values. As with numeric values, division by zero 
and the taking of complex roots are undefined. 


Examples of dual: formulas: 


12. THETA ($ ZENDA $) + D(1.$@17A15,~-1.6663A15) 
13. D(=1,1) + COMPLEX'PRODUCT (IOTA, D(%.A5,13.719A5)) 


323). perations 


A relational:operator is the means of expressing a relation between two 
formas, The relation is in the form of a proposition which may be 
either true or false. Hence the proposition is a boolean:formula, A 
rekationalsoperatonr means one of the primitives in the following list: 


ue EQ is equal to 

Ze GR is greater than 

36 GQ is greater than or equal to 
h, LQ is less than or equal to 

or LS is less than 

6. NQ is not equal to 


In the above list the meaning of each 1elationalioperator follows it 

on the same line. The effect of a telationalioperator is to state that 
the formula on its left stands in the indicated relation to the foumnula 
on its right. The meaning of such a proposition is fairly obvious in 
the case of muerte: forumlas and its truth is determined by an arithmetic 
comparison, In the case of dual: formlas, for the proposition to be 
considered true the relation must hold for both component pairs. If 
necessary a numeric value will be "twinned" for the comparison. The 
precision of an arithmetic comparison is compiler dependent, but will 
usually match or better the precision of the least precise of the two 
values involved, 


Between status: 4ormulas, Literal: founulas, or entry: formulas, the truth 

of the relation depends on the numeric encoding of the values as unsigned 
integers. If enttu values are of different lengths, the shorter is 
prefaced with zeros for the comparison. If lcteral values are of different 
lengths, a shorter octal value is prefaced with zeros, but a shorter 
hokencth or transmisston:code value is prefaced with proverly encoded 
bDLANRA : | 
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A boolean: formula is not to be interpreted in terms of its numeric 
encoding. Hence the Aelatconal:operators cannot be used to express 
relations between boolean: formas. Indeed, r12elatconal:operators 
are elements of boolean: formulas, 


A numerica:relation:List means one of the structures in the following 
list: 


Te relational: operator nuneria: formula 
8, numeric :nrelation: Li4t numeric relation: List 


A dual:relation:£14t means one of the following structures: 


9. rekational: operator dual: formula 
10. duak:relation:Lr4t dual:relation: List 


A Litenal:rekation:£ist means one of the following structures: 


ll. relational: operaton Literal: foramla 
12. Literal :reLation: List Liternal:rekation: Lr14t 


Examples of 1elation:LU4ts: 


13. EQ (XYZ +J/3)/2 | 
14, LQ ALPHA LQ BETA EQ GAMMA NQ 27.5 


3.36 Boolean: formlas 


A boolean: founula means one of the structures in the following list: 


1. boolean: constant 

25 booLean: varrablLe 

36 boolean: function 

y, numeric: fovumula numerie:rekation:L0U4t 

56 dual: forunla duak:rekation: Lr4t 

6. Litenrak: sormla Literal : relation: List 

Te KA LO? nome relational: operator status: formula 
8. status:variable rekatsonaliopenratonr Status: formula 
9. entry: variable EQ entry: ,orunula 

10% entry:vartable NO entry: sormla 

ils ( boolean: formula ) 

ee NOT boolean: soma 

U3. boolean: formula AND boolean: formula 


14, boolean: forma OR boolean: Korma 
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In the forms above in which “elation: &sts occur, for the boolean: 
:fovuula to express the value "true," it is necessary and sufficient 
that the relation expressed by each telational:operator and its two 
adjacent numeria:, dual:, or Witernal: formulas be true. 


The three prumtives, AND, OR, and NOT, are known as boolean: or 
Logicakioperatonrs. Their meanings are illustrated in figure 2. In 

the heading of the figure,p and q stand for simple boolean: formulas. 

The body of the table shows the values of the compound boolean: formulas, 
NOT q, p AND q, and p OR q, corresponding to the possible combinations 
of values of p and q. @ means false and 1 means true. In boolean: 
:founmlas containing Logrcal:ioperators, varentheses may be used to 
indicate the scope of the ovenators, as recursively shown by the 
structures in the list of boolean: formulas. Where precedence is not 
shown by parentheses, fhen) AND, finally QR) 


NOT) takes effect first, en 
Within these categories, the sequence of operations is from left to 
right. 


From the preceding discussion of fo%nelas it can be seen that a boolean: 
formula may contain avithmetic:onerators, relational:ioperators, and 
Logazcak:onerators, It can be deduced from the previous explanations, 
but it is well to point out here, that in such a boolean: formula the 
arithmetic:onperatonrs are applied first, then the relational: operators, 
and finally the logical:openators. The obvious exception to this rule 
is that a function must be evaluated before a fomnula in which it is 
embedded can be evaluated; consequently 1telational:ionerators among the 
paraneters of the 4unction will be utilized before arithnetic:operators 
external to the function. 


g a g g i 
1 d 1 2 i: 
1 i | g 3 i: 4 


Ficure 2. ffect of the Loatcal:ionenators 
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fxamples of boolean: formulas: 


15. 145. LO. XX: EO 3.79 
16. ALPHA EQ BETA AND NOT LIT LS 0($377) 
ge (A+B LS C-D OR X+Y GR 2) AND (X EQ Y OR A LS C) 


3.4 Classes of Statements 


Statements are the operational units of JOVIAL. They describe self- 
contained rules of computation, specifying manipulations of data, or, 
conditionally or unconditionally, sequencing of the execution of 
statements, or both. 


In following sections the various kinds of 4tatements will be explained. 
Here, they are all listed. Statement means any of the expressions in the 
following list: 


non Andependent: statement 
2. named: statement » 
3. simple: statement -—" | 
4, compound statement" 
5. complex: statement 


Indenendent:statement means a simple:statement or a compound: statement. 
Named: Statement means the following expression: 

Os nanie : Statement 

Statement: name means the name in the above expression. From the definitions 
of statement and named:statenent it can be seen that a 4fatenent may have 
more than one name. | 

Example: 

ie CEASE. DESIST, HALT. WHOA. STOP $ 

In the above example, from the space before any of the four names 


up to and including the doLlan:sign, we have a Stop:statement, Each of 
the four nanes is a name of this 4statenent. 
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In the definitions of the various kinds of 4fatenents to follow, 
they will be explained without names, but it is to be understood 
that they retain the defined characteristics when they are named. 
Thus a 4fop: statement remains a S5top:statement whether or not it 

is also a named:statement. The following list exhibits three 
named:statements. The first line is also a simple:statement, the 
second line is also a complex: statement, and the third line is also 
a compound: statement: 


8. Sl . STOP $ 
9. | Se . IF THETA EQ 45 $ XX = .TOT $ 
10. S3 . BEGIN ALPHA = ALPHA + 1 $ BETA = GAMMA/ALPHA $ END 


3.5 Simple: statements 


Simple: statement means one of the expressions in the following list: 


ds assrignnent: Statement 

2 exchange: statement 

36 go:to:statement 

h, Lest: statement 

De Aeturn: Statement 

oe Atop: statement 

T. procedure:catk:statement 
8. ~~“Annut: statement — 
9. output: statement 

10. open: Anput: statement 

ate open: output: statement 

12. Shut: input: statement 

13. — Shutz output: statement 


3.51 Asszgument: statements 


Assrtgnment: statenent means one of the expressions in the following list: 


L * numeric: variable = numeric: formula $ 
2: dual: vartabLe = —duak: fonmnula $ 
Be Literal: variable = Literal: forums $ 
4, boolean: variable = boolean: formula $ 
D. status: vartablLe = status: honmula $ 
6. entry:vart.able = entry: fomnula 2 
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Assrcgnment: statements can be further characterized, in the obvious 
way, by means of the adjectives which occur in each of the above six 
expressions. For instance, numtic:assignmnent:statement means the 
expression on the first line of the above list. 


An asdcgnment: statement specifies that the fownula to right of the 

= sign be evaluated and that this value become the new value of the 
variable to the left of the = sign. It is permissible for the variable 
on the left to occur also in the fo%ula on the right. In this case 
the old value of the vatiable is used throughout the calculations 
needed to evaluate the fownla. A function may, of course, be included 
in the foanla, Evaluation of a function may involve side effects, 
which possibility will become apparent when we consider function: 
sdeckarations. If the side effects of evaluating the function involve 
other elements of the 4o%mula in which the function is embedded, the 
results are undefined. This is so because, although the rules for 
evaluation of a formula are unequivocal concerning the order in which 
elements are combined, the order in which they are mobilized is not 
stated, except that each 4tatenent is completely executed before any- 
thing is done about the next statement. In evaluation of nwnere: 
:founulas and dual: formulas, rules have already been stated concerning 
conversions to compatible forms among integer, fixed, floating, and 
dual values. Such conversions will also be carried out where necessary 
in assigning the value as required in numeric: and dual:iassignment: 
:sfateonents. 


In executing Literal: assignment: statements there will not be any 

conversion among hollertth, transmissionicode, and octal values. If 

the value of the founla is longer than the Ucteral:vartable to which 
it is to be assigned, excess bytes will be truncated starting at the left 

end. If shorter, blanks will be added at the left, as required, coded 

in hollerith or transmission:code to match the coding of the Wcteral: 

svcrzable, 


If the formula on the right in a 4tatus:assicgnment: statement iz « 
Status:constant, it must be one of those anpearing in the declaration 
(or mode:dinective} «hich previously described the 4tatus:variable 
appearing in the same assignment: statement. Otherwise there is no 
way for the compiler to associate a value with the 4fitus:constant. 
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In the entty:assagnment: statement if the entry: formla on the right 
is an entsiy:vartiable which differs in length from the entry:variable 
on the left, in making the assignment excess machine registers are 
truncated starting at the left or else full registers of zeros are 
added at the left to make up the deficiency. 


3.52 Excnange: statements 


Exchange:statenent means one of the expressions in the following 
list: | 


Teg numeric :variable == nuneric: variable $ 
2. dual: varriable == dual: variabLe $ 
3. Litenuk:vartablLe I Literal: variable $ 
4, boolean: variable == bo oLean: variable $ 
oc status variable == status: vartabLe $ 
6. entry: var_able == entry: variable $ 


Exchange: statements can be further characterized by means of the 
adjectives which occur in the above expressions. For instance, 
dual: exchange:statement means the expression on the second line of 
the above list. 


The exchange:statement specifies that the old value of each of the two 
variables is to become the new value of the other variable. The 
remarks made in connection with asscqnment: statements concerning 
conversion of numeric values, non-conversion of (cteral values, 

and truncation and augmentation of €cteral values and entry values 
apply also to exchange:statenents, but in both directions. Example: 


be ENT (T1($I$)) == ENT(T1($9$))$ 
3.53 Go:to:statements 


A Sequence: desrgnator seueteies: a sequel in the sequence of 4tatement 
executions. Normally the statements of a processing:declaration or of a 
prAogram are executed in the order in which they are written. However, 
this normal execution order is modified by use of a Sequence:designator, 
among other devices. A sequence:desiqnator means one of the two following 
expressions: | 


ag | name. 
ee name (S$ andex  $) 


In the first of the above forms, the name must be the name of a 4Stataunent, 


a mnoqnan, a close:declanation, or a Surctch:deckaration. In the second 
form the name may only be the name of a suctch:deckaration. 


oP ee: 
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Go:to:statement means an expression of the following forn: 
3. GOTO Sequence:desrqnator §$ 


A go:fo:statenent may interruvt the ordinary, listed sequence of 4tateient 
executions, defining its successor explicitly by means of a 4equence: 
:destqnator. This interruption will not occur if the sequence:desigqnator 
does not lead, perhaps circuitously, to a 4tatement:name, a vrogram:name, 
or the name of a close:declaration, and the next statement executed will 
therefore be the next listed. If the sequence:desiqnator is, or leads 

to, the name of a program or of a clodse:deckaration, the interruption may 
only be temporary, since a program or a chose:declaration, upon execution, 
may be expected to return control to the next 4tatenent listed after the — 
go:to:statement that invoked it. Finally, if the 4equence:desiqnator 
is, or leads eventually to, a 4tatement:name, the interruption of the 
statement execution sequence will be permanent, with the next 4tatement 
executed being the one bearing the specified 4tatenent: name. 


3.54 Test:statenent, Return:statement, Stop: statement _ 
Test: statement means one of the expressions in the following list: 


1. TEST $ 
2. TEST  loop:variablke  $ 


Although a test:statement is a sunpte:statenent it may only appear within — 
§ cop adadement and its exvlanation depends on concepts pertinent to ¥ 
coop: statement. Its explanation is therefore postponed until the Loop: 


:statenent is explained (section 3.77). 


The retuwin: statement means RETURN followed by a dollarisign. A return: 
:statenent indicates an operational end to a cLose:dectanation, a 
procedure:deckaration, or a function:deckanatcon, and may thus appear 
only within one of these processing:deckarations. It serves to terminate 
the execution of a processing:declaration by transferring the statement 
execution sequence to the exit routine which automatically follows the 
last listed statement of the declaration. An exit routine, being an 
implied function, can have no 4tatemnentiname, and, therefore, cannot 

be referenced in a ao:to:staterent. 
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The 4top:s4fatement means one of the expressions in the following list: 


a. stop $ 
4, STOP 4statement:name $ 


A stop: statement serves to halt the sequence of executions. It usually 
indicates an operational end to the pAcgkam in which it appears. If the 
compiler environment includes an operating system,the 4fop:4tatement 
may be compiled so as to return control to the operating system. Or it 
may be that only the 4fop: statement without reference to a statement: 
osname will return control to the system. If the computer halts without 
giving control to the system and if it is then restarted by some means, 
the execution sequence will resume with the next 4fatement listed, or 
with the statement bearing the specified statement: name if one is given 
in the Stop:statement. See section 6.1 for the use of 4top:statements 
in "other" pAzognrans. 


3.55 Procedure:call: statements © 


An actual: input: parameter:2ist means one of the expressions in the 
following list: 


ie ° formula 

2. May: name 

36 table: name 

4, cLosezname . : 

or —— actuak: input: parameter:List , actuabl:input: parameter: List 


There is one minor exception needed to make this definition complete. A 
Atatus:constant is not permitted as one of the parameters in an actual: 
input: paraneter:£ist. The reason for this is that there is no place in 
the 2ist or in the Statement in which it oceurs (a procedure:call:statenent) 
for the 4tatus:variable which would provide a value meaning for the 
statusiconstant. 


Note that a closezname in an input:narameter:(44st is identified as such 
by the presence of a following period, 


An actual:output: narametern:<45t means one of the expressions in the 
following list: 
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ot variable 

ie tabLe: name 

8. auiy: name 

9. Statement: name . | 

10: actual:output: parameter:List , actual:outnut: parameter: List 


Note that a 4fatenent:name in an output: parameter: List is identified as 
such by the presence of a following pertod. 


A procedure:cakl: statement means one of the expressions in the following 
list: 


1: procedurzezname $ 

12; procedurezname ( ) $ | 

13. procedure:name ( actualk:input:parametern:List ) $ 

14, procedurze:name ( = actualioutput:parameter:List ) $ 

15% procedure:name ( actual:input: parametern:Liust = actual:output: 


sparametern:List ) $ 


A procedure:call: statement serves to call for the execution of a procedure, 
which is a self-contained process with a fixed and ordered set of parameters. 
A procedure is defined by a procedure:declaration. In general, a procedure: 
call: statement consists of a procedure:name, a set (possibly empty) of 
actual: parameters, and necessary delimiters. The actuak:pananeters of a 
procedure:cakl: statement must agree in type, number, and position with the 
formal: parameters of the procedure:declaration which bears the same name, 
That is table:name, close:nane, statement:name, and formula, varirble, or 
Atem:name must correspond to table:name, clLose:nane, statement:name, and 
Ateminame, respectively. In the wrocedure:deckaration the names listed as 
formal: parameters are referenced elsewhere in the decflatation. The 7 
execution of the procedure is effected as if all such references to table: 
snames, Aviay:nanes, cLoseznames, and statenent:names were replaced by the 
corresponding actual: parameter:names. This extends to the <tem of tables 
which are named as fo/unal:parameters. That is, references to the variously 
named bits of the 4ounal:vanameter: table will be effected as references to 
the corresponding bits of the actual:paraneter:table. The above description 
is of the intended method for handling these paraneters, but in at least one 
version of the compiler complete sets of values are transferred between 

the tables which are named as actual:narameters and fownal: paraneters. 
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With respect to parameters which are founulas and variables, execution 

of the procedure is effected as if the values of the soumlas which are 
actual:.nput: parameters are assigned to the items which are fonunal:input: 
spauamexterds before execution and the values of the 40~umal: output: paraneters 
are assigned to the variables which are actual:output: parameters after 
execution. Consequently there must be compatibility between fownal: 
sparameter:1tens and the corresponding actual:panraneter: sonmlas and 
svatiables, of the same nature as exhibited by assignment: statements 
(section 3.51). Indices in the actual: parameter: Lists are evaluated before 
execution. 


3.56 Input, Output, and Fives 


With many data storage devices the insertion or withdrawal of the value 

of an arbitrary item of information may be a relatively complex operation, 
requiring the transfer of an entire block or “Aecord of data. Such devices 
are termed "external" storage devices, as contrasted with the "internal" 
memory of the computer. To allow a reasonably efficient description of 
algorithms involving the data stored in an external storage device, the 
44Le concept is introduced, so that all data which enter or leave the 
internal memory of the computer are organized into 40es. 


A 44Re is a collection of records each of which is again a collection -- 
of bits or bytes depending on the 4<Le tyne: binary or Hollerith. A {cle 
of length k may be considered a vector, arranged as follows: 


p(g), Rys p(1), Rys eee p(k-1), p(k) 


Ryo? 
where the R's are 1ecords, the comnonents of the vector, and the p's are 
partition symbols, with a computer-dependent physical representation, 
which may be interpreted as: 


p(k) = end-of-file; p(n < k) = end-of-record. 


If the record currently available for transfer to or from the 4le 

is R, the stle is positioned at partition symbol p(n), and the value 
designated by "POS(4iLe:name)" is n. An asscgunent: statement 
"POs(f.lesnane) = N $" positions the 4<2e to the value specified by 

i, where @ < N < k. In particular, "POS(4<fe:name) = g $" "rewinds" 

the Atle. Any 44le for which the general positioning operation is to 

be avoided as inefficient (e.g., tape) or impossible (e.g., cards, printer) 
is called a "serial," as opposed to "addressable," (re. 
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A record in a fre may be input by a read operation or outvut by a 
write operation, although some 44£@4 are read-only or write-only depending 
on the characteristics of the storage device involved. 


Input: operand means one of the following five expressions: 


vauablLe 

Ce VUE Y 2 NANZ 

ce table: name 

h, table: name ($ index $) 

5. table: name ($ dndex ... Andex $) 


Output:operand means one of the following two expressions: 


6. constant 
Te Anput: operand 


An onerxand in an inout:statenent or an output: statement specifies the 
neconrd to be read or written, which may consist of the bits or bytes 
representing: a single value, denoted by a constant or a variable; 
the values comprising an Quay, indicated by an aviayiname; the values 
comprising a table, indicated by a table:name; the values comprising a 
Aabke:entty, indicated by a tablLe:name subscripted by a 1-component 
entry:index; the values comprising a consecutive set of table:entries, 
indicated by a table:name subscripted by a@ pair of one-component 


entryzcndices (sevarated by ... the continuation ideoqram) , whose values 
specify the initial and final entrees of the set. 


3.57 Input:statenents, Open and Shut 

Input: statement means: 

1 INPUT 44lezname Anput:operand ¢§ 

Vpenzanjut: statement means one of the two following expressions: 


a. OPEN INPUT 44lLername 3 | 
ce OPEN INPUT 4ifezname input:overand $ 
Shut: znput: statement means one of the two following expressions: 


4, GHUT INPUT 44lername $ 
oe SHUT INPUT f4Le:nane Anvout:onerand $ 
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A 44fe may be read by the execution of a sequence of Statements consisting 


of, first, an open: Anyput : statement, next, a sequence of input: statements, 
and finally, a Shut:input: statement. | 


An open:input: statement activates the 44Le and prepares it ‘for reading. 

An open:input: statement need not designate that a 1ecord be read, in which 
case, ile position is initialized to zero. If, however, values are 
designated to be read from a “ecord, the read operation is initiated and 
f4le position is set to 1. The meaning of "initialized to zero" depends 
on the compiler and the characteristics of the 4ile. It may mean "set 

to the initial position” or it may mean "call the present position zero." 


An anput: statement initiates a read operation transferring data from the 
record to represent the designated values, and increments the {ile 
position by 1. The sequence of 4tatenent executions may continue, 
concurrently, with the read operation although the 4<le is "busy" (or 
at any rate not "ready") until the read is successfully terminated. 

This occurs when a partition symbol is encountered, or when all the 
designated values have been read from the 1ecord, A read operation is 
unsuccessful when started from the end-of-file position or when 
uncorrectable errors occur in the data transmission. 


A sShut:input:statement serves to deactivate the 4ile, releasing the 
external storage device associated with the 4<2e for possible other use. 
A Sdhut:input: statement need not designate values to be read from a Aecord, 


ae if any are designated, the read operation is completed prior to the 
deactivation of the {le. 


3.58 Output:statements, Open and Shut 

Output: statement means: 

a. OUTPUT ile: name output:operand $ 
Open:output:statement means one of the following two expressions: 


2. OPEN OUTPUT  4iLernamne $ 
3% OPEN OUTPUT  file:name output:operand $ 


Shut: output: statement means one of the following two expressions: 


h, SHUT OUTPUT  {iLername $ 
5. SHUT OUTPUT ({ilername outputzoperand ¢ 


Sa 
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A f4le may be written by the execution of a sequence of statements 
consisting of, first, an open:output: statement, next, a sequence of 
output: statements, and finally, a 4hut:output:statenent. 


An open:output:statement activates the 41le and prepares it for writing 
(e.g., an identification block may be written). An open:output:statenent 
need not specify that a 1ecord be written, in which case {Le position 
is initialized to zero. If, however, an output:operand is specified, 

the write operation is initiated and 4<2le position is set tol. 


An output: statement initiates a write operation for the next output 
xecond and increments the {ile position by 1. The sequence of 4tatement 
executions may continue, concurrently, with the write operation, although 
the 4ile is not "ready" again until the write is successfully terminated, 
when all the specified bits or bytes are written without the occurrence 
of any uncorrectable error in the data transmission. In some {xles, 
partition symbols and thus {le positions are predetermined. Consequently, 
a write operation started from the end-of-file position would be 
unsuccessful. In other {ile4, notably tape 41224, the partition symbcls 
are determined by the write operation itself so that, in effect, the 
end-of-file partition symbol follows the last “ecord written. 


A Shut:output:statenent serves to deactivate the 41le, causing its 
termination by an end-of-file partition symbol and releasing the 
external storage device associated with the 4cfe for possible other use. 
A Shut:output:statenent need not specify that a 1ecord be written, but 
if an outrutzoperand is specified, the write operation is completed 
prior to the deactivation of the fle. | 


The records of a file have no internal structure, and may be thought of as 
strings of bits or bytes. Structure is supplied only by the operand » 
portion of the input:statement or output:statement. Thus, reading and 
writing are just information transfers, and no editing or rearranging of 
data (except that required for conversion to 6-bit hollercth code) is 
implied. A write transfers just the bits or bytes specified by the onenand. 
A read transfers just the bits or bytes of the tecord, to the maximum 
designated by the overand. 


A shut:statenent is defined only for active {iles, and an open:statenent 


is defined only for inactive 4<fe4. Further, some ike pairs must not be 
active concurrently, for example: two 4ikes on the same tape reel. 


3.90 
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Input: statements and output: statements are defined only for active 
files, and in general, an active 4cle may be both written and read, 
and positioned -- if the 4<le characteristics allow. Thus, a read 
with a serial, write-only 4<e such as a printer is undefined. ‘The 
characteristics of some 4ile4, however, also preclude the initiation 
of a read or write operation when the {cle is "busy", thus eliminating 
the possibility of stacking input-output operations. 


3.6 Compound: statement 


A compound: statement is a string of Statements enclosed in the brackets, 
BEGIN and END. The enclosed Statements may be named or not, 4unple, 
compound, or comp£ex and there may be declarations and directives 
included among them. In order to make the definition more precise it 
is necessary to define a statement: List. 


A Statement:Liust is one of the expressions in the following list: 


1; —s- SKatement 

25 declaration statement: L1u4t 
3. directive statement: L45t 
yo statement:List declaration 

Se OC statenent: List dinective 

6.  —btatement:List stateonent: Lut 


A compound: statement means the following expression: 
Ts BEGIN Astatement:List END 
Example of a compound:statement: 


8. BEGIN ALPHA = 1 $ SL1. GOTO SL7 $ SL2. BEGIN INT ( 
X9, Xl, DERIV. = AREA) $ GOTO DERIV $ END END | 


3.7 Complex: statements 


Complex:statenent means one of the expressions in the following list: 


ae dinect: statement 

‘2, conditional: statement 
3 alternative: statement 
4, Loop: statement 


Sef 
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3.71 VDarect: statements 


The direct :statenent is a means for breaking out of the JOVIAL 
language within a plogrian and writing some instructions in another 
language more directly related to the organization of the computer 

for which the program is being compiled. What is legal and meaningful 
within a dinect:statenent depends on the particular version of the 
compiler which is processing the plogram. For a precise definition of 
dinect: statenent it will be necessary to make a few preliminary 
definitions. 


Dinectiassign provides access to the varcables of a JOVIAL program 
from within a direct:statenent. D«rect:ass4gn means one of the 
expressions in the following list: 


1. ASSIGN Aloptional: optionally: signed: integer: constant) = named:variablLe §$ 
2. ASSIGN nameazvartable = Aloptional:optionally: signed:integer:constant) $ 


There must be no 4paces between the A and the left: parenthesis or between the 
parentheses. In the first form above, the value of the named:variable is 
moved to the accumulator (the principal program-accessible register of the 
arithmetic unit). In the second form the value is moved from the accumulator 
to the varcable, If there is no constant within the parentheses the 

contents of the accumulator represent a floating value. If there is a 
constant other than zero the value is 4ixed, with the stated number of 
fractional bits in the accumulator. A negative number means the binary 

point is so many places to the right of the right end of the accumulator. 

If the constant is zero the accumulator contains an integer or non-numeric 
value, 


Danect:code means an essentially arbitrary string of JOVIAL 44gn4, not 
including the symbol JOVIAL, optionally interspersed with durect:assigns. 
More specifically, dinect:code means one of the following expressions, 
but not including the symbol JOVIAL: 


36 SAQNS 
4, direct: assign 
De dinect:code direct:code 


ora: 
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Danect:statenent means: 
6. DIRECT dumect:code JOVIAL 


Although direct:code is arbitrary so far as the definition of JOVIAL 
expressions is concerned, only certain configurations will be meaningful. 
If the input medium is punched cards, specifications of meaningful 
dinect:code will probably involve positioning on the card. Because of 
this it will probably be "safest" to prepare programs so that each direct: 
sas44gn is on a separate card without other dinect:code (except spaces) 
and so that there is no ditect:code, besides spaces, on the cards 
containing the symbols DIRECT and JOVIAL. 


It has been felt "safest" to classify a direct: statement as a complex: 
statement, but if it contains no dimect:assigns it may be considered a 


sample: statement, | | 
3.72 Conditional: statements 
A conditional: statement means: | 
is LAE CLAUS @ Andependent: statonent 


Remember that an independent:stateonent is a sannle:statement or a 
compound: statenent, The expressions in this and following sections 
which are here called clauses are known as 4Statenents in other JOVIAL 
documentation. The present nomenclature, however, is felt to make it 
easier to understand the language structure. 


I4:clause means one of the two following expressions: 


2. IF boolean: forma § 
3. statement:name . 4ficlause 


The effect of a conditional:statenent is that if the value of the boolean: 
sfounula of the <4:cLause is true, the indevendent:statenent is executed; 
otherwise the tndenendent:statenent is skipped. 

Following are two examples of conditional: statements: 


ls IF ALPHA = BETA LS 2 $ GOTO NEAR $ 
on IF BOCL $ LBL . BEGIN RANDOM (= BASIC) $ BASIC = BASIC ** 2 ¢ END 
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3.73 Alternative: staterents 

Whereas a conditional: statement provides an independent: statement 
which may or may not be executed depending on the satisfaction of a 
condition, an alternative: statement provides a list of <ndependent: 
statements and associated conditions. That independent: statement 
associated with the first condition which is satisfied will be the 
only one executed if any one is. The conditions are expressed by 
the boolean: formulas in the following definitions. 
If:erther:clause means: 

1. IFEITH boolean:foramla §$ 

Ons2§scelause means: 

2. ORIF boolean:formla $ 

Alternative means one of the expressions in the following list: 


3. OrNsLf£ clause Andependent: statement 
4, statement:name . alternative 


Alternnative:2ist means one of the following two expressions: 


5 Af erther: clause independent: statement alternative 
6. alternative:List alternative 


Alternative: statement means: 
er altennative: hibt END 


Here is one example of an alternative: statement: 


8. IFEITH ALPHA LS BETA $ 
ALPHA = BETA $ 
Ll . ORIF ALPHA + BETA GR 19 $ 
BEGIN GAMMA = ( ALPHA + BETA ) / 2 $ 
L2 . ALPHA = GAMMA +1 $ 
BETA = GAMMA +1 $ 
END 


ORIF 1 $ GOTO KEEP $ 


3.13 
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The above example provides for the execution of one assignment: 
:statement if the first condition is satisfied. It makes no 
difference then if any of the other conditions are satisfied: 

after execution of the single assagnment:statenent the execution 
sequence continues with the 4tatement following the second EID, 

If the first condition is not satisfied, the second condition is 
examined, and so forth. The third condition in the example is a 
catch-all. The constant 1 is a boolean: formula which always has 

the value "true," A jump to Ll from elsewhere in the progran 

will cause the search for alternatives to begin at that point; 

it is as if execution of the alternative:statenent had begun at the 
top, but that all the conditions before the referenced name were 
false. A jump to L2 will cause execution of the 4tatenent at that 
point regardless of the satisfaction of the earlier conditions. In 
this case only two of the three simple: statements which comprise the 
Andenendent:statenent of this alternative will be executed. Following 
execution of BETA = GAMMA - 1 $ control will pass to the statement 
following the altermative:statenent, 


Although @ and 1 should be recognized as boolean: formulas in 44: 
sclLauses, t44:ercther:clhauses, and or:if:clauses, the compilers presently 
recognize only 1 in the expression ORIF 1 $ in such cases. Actually, 
of course, this is the only place, other than assignment: statements, 
where such recognition is useful. 


3.74 Loop: statements 


The Loop:statement provides for the "iteration" of an independent: 
:statenent (or spectal:compound), The iterations or repetitions of 
the tndependent:statenent are controlled by means of one or more 
Loop:vartables which are set up by for:clauses. Remember that a 
LoopivarcablLe is a single Letter in certain contexts. Those contexts 
will now be described. 


Commlete: forz:clause means one of the following two expressions: 


FOR foon:variable = numeric: 4ormula , numeric: formula , numeric: sormuta 4 
FOR foovivariable = ALL ( nane ) $ 


Poo 
Ld 
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In the second of the above expressions the na@ne must be a table:nane 
or the name of an item belonging to a table. In either case, the 
complete: for:cLause with the ALL modifier is equivalent to either one 
of the following two expressions: 


3. FOR Loop:varcable 
4, FOR Loop:varcablLe 


Q,1, NENT ( name) -1 $ 
NENT ( name)-1,-1,948 


The designers of each compiler are free to decide, arbitrarily, which of 
the two interpretations to select. Presumably they will choose that 
interpretation which is likely to give the better machine language code. 
Hence, the ALL modz{1e% should be used only when the programmer does not 
care which of these two interpretations is assumed. 


The complete: sorzclause defines a Loop:varriable to control the iteration 
of an 1ndevendert:statement and for use as an integer:variable within the 
Statement, The first of the three numeric: founlas is the initial value, 
given immediately to the Loop:variable (in the sense of "assignment" to an 
Anteaer:variablLe). The second formla provides an increment to be added 
to the Loop:variabke for each iteration. The third forma is a limit 

for iteration. After the Loop:variable has been increased by the current 
value of the increment it is compared with the current value of the limit. 
If it has not reached or gone beyond the limit, execution of the independent: 
:statement (the one controlled by the for:clause) is repeated. If the 
value of the Loop:variable after incrementation is beyond the value of the 
limiting founda, the tndependent:statement is not repeated. "Beyond" 
means "sreater than" or "less than" depending on whether the increment 
value is currently vositive or negative, respectively. In some compilers 
the direction of comparison depends on the explicit sign rather than the 
current value of the increment, 


Inconplete: horz:cLause means a two: factor: for: clause or a one: factor: for: 
clause. A two: factor: for:clause means the following expression: 


55 FOR oop:variable = muinericerfonula , nuneric:founmla § 


The two: factor: sorsclLause defines a LoopsvarrcablLe with some measure of 
control over the iteration of an independent:statenent, The first of the 
two jwuneric: formulas provides the initial value of the loop:varimbLe. 

The second 4ormula provides the increment to the loop:variable for each 
iteration of the «ndependent:statement. There is no limiting value 
provided and termination of the reveated executions will have to be 
rrovided bv some other means. 
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One: factor: for:cLause means the following expression: 
6. FOR oop:varttable = numeric: {ornula §$ 


A one: factor: for:chause defines a Loop:variable and gives it an initial 
value, but it does not cause any iteration. 


Spectal:compound means one of the following expressions: | 


Ts BEGIN Atatement: Lut Afickause END 
8. name gS Hecial:compound 


Although the s4ynectal:compound is not, strictly speaking, a Statement, 

the name in the second of the above two expressions is a 4tatenent: 

name, It may be considered a name of the first statement in the statement: 
shit. The special:compound may take the place of the independent: 
:statenent in a Loop:statenent and be iterated under control of the 

Loop: variables. 


IncompLete:Loop: statement means one of the following expressions: 


9. Ancomplete: for: clause Andependent: statement 
10. AncompLete: for:clause special: compound 
ll. Ancomplete: for: clause Aneomplete: Loop: statement 


Note that an incomplete:Loop:statement is a statement and may therefore 
be preceded by a Statenent:name and a pertod., One example of an incomplete: 
:Loop:statement is the following: 


12. FOR IT=1,1 $ 
SLl. FOR J=1I+5 $ a 
BEGIN AA ($3$) = BB ($1 $) $ 
J = 2 %* IT =- 1 $ | 
IF BB ($ I$) EQ @$ GOTO EXIT $ 
IF J GR 1¢¢6 $ GOTO SL1l $ 
END 


Complete: Loop: statement means one of the following expressions: 


ies commlete: for:clause Andependent: statement 
1h, complete: forsclause Snecial: compound 
25. complete: sors clause Aneomnlete: Loon: statement 


16. one: factor: for: clause complete: Loop: statement 
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From the last two definitions we see that a loop:statenent is a string of 
forzsckauses followed by an independent: statement or a special:compound. 

A Spectal:compound may be used as part of a Loop:statement only if at least 
one of the string of for:clauses is a two:factonr: forsclause or a complete: 
:horz:clause. In a comnlete:Loop:statement it is actually permissible for 
more than one of the for:clauses in the string to be complete: for: 
scLauses. The compiler, however, will ignore the third fowmula in all 

but the first of such clauses, treating them as two: factor: for: clauses. 


3.75 Use of Loon:Statenents 


The effect of a Loop:statenent is to define a set of Loop:variables and, 
usually, to execute an independent: statement or spectial:compound repetitively. 
Since a Loop:statenent is a statement, it may be part of the 4tatenent: 

sQi64 which forms part of a larger loop:statement. Such nesting of Loop: 
:statenents, in general, leads to repetition of the execution of the inner 
Loop: statenent, each execution of this inner lLoop:statenent leading to 
repetitive executions of the <ndependent:statement which forms its latter 
part. 


Each for: clause defines or activates the Loop:variable which immediately 
follows the 4ymbo£ FOR and gives it the current value of the first nwnerie: 
:f0%muLa following the = sign. This Loop:vartable is then active and may 
be used as an integer:variable until the end of the independent: statement 
which is the latter part of the loop:statement. The Loop:variable is active 
and may be used in the formas of the other for: clauses of the string 
following the one which activated it. It is even active and may be used in 
the one or two founlas following the fo/umla which provides its initial 
value in the same jor:clause that activates it. A for:clause may be used 
to activate only a loop:variable which is not already active. A given 
Loopivariable may be activated by more than one foriclause, but these fOr: 
:cLauses must be parts of disjunct Loop:statenents -- they must not be 
included in the same string of 4or:clauseds and one must not be nested 


under another. They will be considered different loon:variables in the 
different toon: statements. 


A LoopsvartablLe is activated only by execution of the for:clause and 

remains active only so long as execution remains within the loop: statament, 
except for the cases noted in the next paragraph. A Loon:statenent must 

not be entered from outside by means of a ao:to:statement leading 

(directly or through switches) to a statenent:name inside the Loon: statonent. 
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This prohibition applies to statement:names on any fors:clauses other 
than the first one in a string as well as to 4statement:names, switch: 
snanes, or cLosesnames on or within the independent: statenent forming 
the latter part of the lLoop:statement., It is permitted to transfer 
control to statenents, for:clauses, suctch:decltarations, and close: 
:declanatzions within a loop:statement from other points within the 
same Loop: statement, 


In general the Loop:variables are deactivated whenever control is 
transferred outside the loop by means of a go:to:statenent or by 

coming out the bottom because of completion of the loop:statemnent. 

The Loop:variables are not deactivated if control is transferred to a 
procedure:declaration, a function:declaration, or a program:name; 
provided the procedure, function or outside program returns control 

to the Loop:statement through the normal exit of the procedure, function, 
or ptLogkam or through one of the actual:parameter alternate exits (from a 
procedure) if this alternate exit is a nwme within the loop:statenent. 


3.76 Processing:declarations Within Loop: statements 


Procedure:deckarations and function:declarations written within a Loop: 
:statenent are not, in any way, associated with the Loop:variables defined 
for the Loop:statenent. The same Loop:variables may be defined for Loop: 
:statenents within the procedure: or function:deckarations and may be used 
inside the procedure: or function:declarations only within such loon: 
:statenents., Execution of a procedure: or function:deckaration may be 
invoked from inside or outside any Loop:statenent within which the 
declaration may be written. 


Loop:variables are, on the other hand, defined within switch:declarations 
and close:deckarations written as ae of the Loop:statenent for which 
the Loop:variables are defined. These Loop:varmbles may be used inside 
such suitchzdeclarations and close:deckarations; these surtch: declarations 
and clLose:ueckarations may be invoked from inside the lLoop:statenent in 
which they occur, but not from outside; and any such close:decltaration 
must not contain a for:clause defining one of these same loon:variables. 
If a wrocedure:carl:statenent or a functson:call within a Loop: statunent 
contains, as an dnputinaraneter, the nane of a cLose:deckaration also 
within the loop:statenent, this is considered proper invocation of the 
closeinanie from within the same loov:statewiient. 
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3.77 Iteration Control 


The compiled instructions needed to do the testing and incrementing 
specified by complete: for: ckauses and two: factor: for: chlauseds are inserted 
at the end of the loop:statenent. Incrementation of the lLoop:variables, 
by the current values of the corresponding incrementation formulas, takes 
place in the reverse order of that in which they are defined. If there 

is no complete: for: clause, incrementation is terminated by an unconditional 
transfer to the top of the loop, just following initialization of the last 
Loop:vartabke. If the for:chause string contains a complete: {or: clause, 
incrementation is followed by a test of the controlling Loop:variable, the 
one defined by the complete: for: clause. If the controlling lLoop:vartable 
has not reached or gone beyond the current value of its limit, control is 
transferred to the top of the loop; otherwise, execution proceeds to the 
instructions following the Loop: statement. 


As mentioned before (section 3.54), test:statenent means one of the two 
following expressions: 


l. TEST $ 
2 TEST  oop:vanriablLe $ 


A test:statenent may only appear within a loop:statement. It serves to 
transfer control to the iteration control routine at the end of a Loop: 
sAtatement. Since the iteration control routine is an implied function. 
without a name, a go:to:statenent cannot be used to transfer control to it. 
A test:statement without a Loop:vartable transfers control to the beginning 
of the next following iteration control routine. 


A test:statement containing a Loop:variable may only appear in a Loop: 
statement in which the referenced lLoop:variable is defined. It serves to 
transfer control to the point at which the referenced loop:variable is 
incremented. Thus it causes incrementing of the referenced lLoop:vartable 
and all those which precede it in the initialization sequence for the 
Loop:statement. If the referenced loop:variable is one which was defined 
by a one: factor: for:clause, control is nevertheless transferred to the 
proper place so that incrementation and testing takes place for those 
Loop:variables defined in the Loop:statement before the referenced loop: 
svariabke but not for those defined after the referenced loop:variable. 


Cal 
ae 
—~J 
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FOR A 
FOR B 
LC. FOR C 
BEGIN 
FOR D 
FOR E 
FOR F 
BEGIN 
* * *€ * & 


GOTO LC 
* ££ & & & 


TEST$ 
* *%*+ 8% & 


TEST D$ 
¥ ££ t+ €+ & 


IF ALPHA EQ @$ came 
END ; ® 


X11, X12, X13$ | Initialize A 
$ Initialize 38 
X31, X32$ ———> Initialize C 


s 


X41, x42, x43$ Initialize 
X51, X52$ Initialize 
X61$ Initialize 


3 3 


Increment 
Increment 
Test 


OU 


X71, X72$ Initialize G 


LH. FOR H Initialize H 


= | Initialize 
FOR J = X91$ Initialize J 


* * #+ + 
TEST G$ 


IF BETA EQ @3 7] 
END | Increment 


G 

Test (7) G 

EAD . Increment C 
| Increment A 


Test A -_CC— 


Ficure 2, Locv:statenent Summary Example 


16 March 1964 59 TM-555/002/02 
(Page 60 blank) 


The t4:clause at the end of a Special:compound controls execution of the 
iteration control routine at the end of the loop:statement. Execution of 
a test: statement, however, supersedes control by this 4{:clause. When the 
4$:clause is executed , if the condition is true the iteration control 
routine is executed; if the condition (the boolean: formla) is false the 
iteration control routine is skipped, thus terminating execution of the 
Loov:statemnent. 


Figure 3 summarizes the foregoing discussions of loop:statements, showing 
complete: and tncomplete:Loop: statements, nested lLoop:statenents, test: 
:statenents, and transfers to the midst of a string of 4or:clauses, together 
with initialization of the Loop:variables and iteration control. On the 
left in the diagram is a sample of JOVIAL coding. A line with five 
asterisks represents one or more lines of JOVIAL coding not germane to 
this discussion. On the right the initialization and loop control is 
shown in positions corresponding to their respective parts of the code. 
The incrementing and testing of D and E (and F if there were any) corres- 
ponds to the first END. The control with respect to A and C (and to Bif 
there were any) corresponds to the last END. The arrows show transfers 
of control. Some of the coding represented by lines of asterisks must, 


of course, permit jumps around the go:to:statements and test: statements 
shown. 


The four little "electric switch" diagrams represent conditional transfers. 
After the incrementation of G there is an unconditional transfer to the 
beginning of the loop in which G and H are defined. This transfer point 

is called a "test on G," but the jump is unconditional since the Loop: 
:statement is incomplete (there is no limiting formula). In the loop on 

I and J there is no incrementation and no return since all the pertinent 
forzckhauses are one: factor: forzclauses. 
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Chapter 4. Declarations 


4.1 Undeclared Names 


Declarations are the principal means of associating names with the elements 
of a program or of its environment. This discussion begins by considering 
the exceptions. A 4tatemnent:name is defined by its appearance (not in a 
narametenr: List) jaa by a pettod. It is thereby defined as the name 
of that point in the pt0gram which is the beginning of the next statement 
or clause. A reference, in the procedure: or function: declaration, to a 
name which is followed by a period in a formalzinnut: parameter: List is 
treated as a reference to the corresponding close:name in the invoking 
procedure:calk:statement or function call. Such reference to a name 

which is followed by a petiod in a formal:output: parameter: List is treated 
as a reference to the corresponding 4tatenent:name in the invoking ptocedure: 
scall: statement. 


4.2 Pre-defined Names 


Names may be pre-defined for a mtogram as names of items, tables, files, 
external programs, mocedure:declarations, or function:declarations. 
Such pre=definition is accomplished by means of a COMPOOL or a library 
or both. 


A COMPOOL (communications pool) is a table or dictionary of definitions 

for use by a system of related plogianms. If a program is to be integrated 
into the system, the descriptions and locations of common data, procedures, 
and plogxamsS are found in the COMPOOL. A library does not contain descrip-= 
tions, but rather complete mocedures or functions. If a program calls 

one of these procedures or functions, it is copied from the library and 
made a part of the program, 


If a mogtam written in JOVIAL makes reference to a name defined in the 
COMPOOL or library and if this reference is compatible with the COMPOOL or 
library definition, then the reference is taken to be a reference to the 
COMPOOL or library defined nane,. If, however, the ptogram properly defines 
such a name explicitly then, if there is a conflict, this definition takes 
precedence and the COMPOOL or library definition is disregarded. "Proper" 
definition has reference to the necessity of placing mogramdeclarations 
and data:declarations ahead of any references to them. 
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4.3 Mode-defined Names 


NameS which have not been pre-defined, nor declared, nor previously 
defined by mode, as elements with conflicting scope and category 

(section 6.5) may be defined by mode simply by referencing the name 

in an appropriate statement. Each compiler assumes a normal mode for 
such definitions -- probably an integer of some convenient size; perhaps 
Signed, perhaps unsigned. The method for changing this mode is described 
in section 6.4. 


Definition by mode can be done only for 4simple:rtens and it cannot be 
done if it would thereby change the existing scope of definition of the 
same nam@ applied to a different element. Consider, for instance, a 
mocedure:declLaration in which a particular name is not declared and 
is not used as a f0unel: parameter, but is used as if it were the name 
of a sample:rtem: 


co If the name has been pre-defined as a sanple:ctemn: 
sname, or declared in the main:ptogriam (before this 
procedure:declaration is encountered) as a simple: 
sitenzname, or defined by mode in the matin: program 
(pefore this procedure:deckaration is encountered), 
then the reference to it is a reference to that 
Sample:item which is already defined (global <tem). 


2. If the name has not yet been defined in any way for 
the main: program as any entity in the same category as 
a sample:ctens:name, then the reference to it in this 
wprocedure:deckaration serves to define it by mode but 
only within this procedure:deckaration (local item). 


3. If the name has already been defined in some way for the. 
nmin: program, not as a sample:ctem:name, but in the 
same category (see section 6.5), then this reference in 


this procedure:declaration is erroneous. 
4.4 Vata:deckarations 
Vata:deckanations serve to declare and describe the data on which a 


yvtogiam is to operate -- the inputs, the initial elements of information, 
the intermediate results, the final results, and the outputs. The 


rae? 
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names given to the data follow the pruntives which begin the 
declarations, are chosen at the arbitrary discretion of the programmer 
(or programming supervisor), and have no necessary connection with names 
used in the outside world -- on input manuscripts or printed output, for 
instance. Data:declanation may be subdivided into groups as follows: 


is Atem: declaration 

26 table:deckaration 
3. overlay:declaration 
4, frile:declaration 


Iten:declaration may be further subdivided into the following groups: 


De s4mple:iten: declaration 
6. Andexed: iten: declaration 


And indexed:iten:declaration may be subdivided into the following 
groups: 


T. vauray: item:declaration 
8. table: item: declaration 


Numbers, which have been defined in section 2.62, are used extensively 
in data:declarations. In the expressions to be discussed below, there 
will be several numbers in a single form, each with a different meaning. 

In order to facilitate the explanations, each of the expressions in the 
following list is defined to be a number: 


9. nin 
#0; n2n 
ll. n3n 
12. nan 


The above list is to be understood to be extended, as far as required, 
in the obvious way. Each of these special ways of writing nwnber will 
be used with only one significance in the explanations to follow. 


Zo 


Lod 
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Lu Item: descriptions 


Iten:desceriptions are parts of iten:declarations which give the 
characteristics of the ites. The adjectives, defined in section 2.61, 
which apply to constants and variables also apply to Leis , Akemi 
:desertptions, and iten:declarations. 


FLoating:iten:description means one of the expressions in the following 


F 
° F R 

F fLoating:constant ... f£0ating:constant 

F R <koateng:constant ... floating:constant 
The abbreviation F specifies a floating:iten. The optional:abbreviation 
R declares that any value assigned to the «tan be rounded instead of 
truncated. The pair of {loating:constants separated by the ... ideogram, 
if pecacuye state an estimated minimum through maximum absolute value 
range. this range might be used by the compiler in optimizing the machine 
language program. The constants must be positive or zero and the smaller 
must come first. ° 


Integerzspeccyi2t means one of the expressions in the following list: 


De To onin 7 
6. I n7n U 
Te A in § 
on A nin U 


integer: ctemsdeserip: 2.4 means one of the following expressions: 


9 ANE AGeAE Apecrtfier 

10. Antegerzspecryrer R | 

sais Antegerz:specifrer Anteger:constant ... «nteger:constant 
12, Antegerz:specifier R Aznteger:constant ... «nteger:constant 


‘7 declares the number of bits required by the <ten, including any sign 
bit; S declares a signed ito; U declares an unsigned (positive) tte; 


reg ee 
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R declares, if present, that any value assigned to the <twn be 

rounded instead of truncated; the optional pair of constants give 

the range as explained for {loating:iten:description. The use of 

A instead of I in an integer:iten:description is allowed because of 

the similarity to a §ixed:i.ten:deseription, where A stands for "arithmetic." 


Faxed: specti44er means one of these two expressions: 


13. A n7n S opttonally: signed nbn 

14. A nln U optionally: signed:ns&n 

Faxed: item:descrtption means one of the expressions in the following list: 
156 hAxed? Spec fier 

16. fAXed? SNeCrfrer R 

17. fLXeds spect sien constant eee constant 

19% fixed: specrfier R constant eos constant 


Again, n/n declares the number of bits required by the item, including 

the sign bit if there is one; S declares a signed (ten; U declares an 
unsigned (positive) <ten; n&n declares the number of fractional bits in 

the «ten; R declares rounding instead of truncating; the pair of constants 
give the absolute value range as explained above. The constants may be 
floating or Aanteger or fixed, The rules about spaces permit a form such as 
1....5 to be written. This may seem ambiguous, but the necessity for going 
from lesser to greater values requires it to mean the same as if l. ... 5 

had been written. If the first mwnber in such an expression were zero, the 
meaning would be ambiguous without some convention. Hence the convention is 
adopted that if number,... is written and if nothing preceding forbids, it 
will be considered as if number, ... had been written, whatever may follow the 
fourth period, If n&n, along with its optional sign, specifies a negative 
value, it means that low order integer bits are missing from the «tem, The 
abbreviation A used in this description means “arithmetic.” 


Juaki srect4cet means one of these two expressions: 


19. D nn S_ optional: ontionally: stgned:nin 
20: D xvnn U  ontionalroptionally: signed:n&n 


Duak :ctenzdesertptron means one of the following four expressions: 


21. dual? SECA fLer 

oo. QUART APeChfseh oR 

23% dualispecijier — duak:constant ... duak:constant 
au, dualz:sneci{ion “ dual:iconstant ... duak:constant 


ora 
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The abbreviation D specifies a dual:item; n7n declares the number of bits 

in each component of the <tem, including the sign bits if present; S de- 
clares each component to be signed; U declares each component to be unsigned; 
nn declares the number of fractional bits in each component; R declares 
rounding instead of truncating; and the optional pair of dual:constants 
declare estimated minimum through maximum absolute value ranges for the 

two components. 


HoLLerncth: cten:description means H nin 
and transmission:code:tten:description means T nin 
where “7n declares the number of bytes in the <tem. 


Status: iten:description means the abbreviation S followed by an optsonal: 
:n7n followed by a string of status:constants. If present, n7n declares 
the number of bits to be allocated to the <item. If the given number of 
bits is k, the number of 4tatus:constants must not exceed 2), If nin 

is not given, k wil} be determined such that the, number of s4fatus:constants 
is greater than 2 and less than or equal to 2°. The string of status: 
sconstants declares all the possible values of the tam. 


Boolean:iten:desceription means the abbreviation B 


bebo Sémples items 


Sample:itemsdeclaration means one of the expressions in the following list: 


1 ITEM name itemnedescription $ | 
2. ITEM name Aten:description P optionally:signed:constant §$ 
36 ITEM name optionally:signed:constant $ 


The sample:rten:deckaration defines an ctwn by naming it and describing it. 

The second and third forms above also give it an initial value, the value 

of the constant. In the second form, the P stands for "pre-set." The constant 
must be consistent with the <tem:description; that is, it must be of a type 
which can be assigned to this ite” in an assignment: statement, In the third 
form the description is implicitly that of the constant. The third form, the 
one without an explicit descityption, cannot be used to declare status: ites 

or boolean: items; the use of @ or 1 or an octak:constant declares an 
Anteger:4te. 


Examples of simole:iten:deckarations: 
i ITEM ALPHA F $ 
a ITEM THETA FR @. se. 3.2416 $ 
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3. ITEM X2 I 6 S R 5 wee 23 P -18 $ 

4, ITEM X3 A15 U 5 P 97.168 $ 

5. ITEM X4 -97.168A7 $ 

6. ITEM DX5 D 13 S -3 D(2h,2k)...D(24606,2h0¢0) $ 


4.43  Independent:overtays 


Space for items is allocated in the computer in various ways depending 
on the particular compiler. In general, space at least as large as the 
declared size is set aside. There are restrictions, however. Any 
restriction on the size of a @cteral:iton usually is dictated by the 
maximum size of n7n expected by the compiler. Besides this restriction, 
most compilers will not handle «tems, other than Citeral:itens, greater 
in size than one machine word. 


It is possible to specify that storage for sample:ctems, tables, and 
UuiayS be allocated in particular sequences. This would not be useful 
except that it is also possible to specify that these sequences start 
in the same machine word. Thus an (ton may have more than one name, 
each name corresponding to an entirely different description of the 
Atem. It is even possible for a literal:item, for instance, to overlay 
more than one <tem, | 


In all compilers (which compile this version of JOVIAL) presently in 
existence, sAmple: items are not packed. That means they occupy one or 
more machine words without sharing any with other 4f@74. Some other 
features of data storage are not quite so standardized. In one compiler 
all tables begin with a control word containing the number of entices in 
the table. In another compiler, only variable length tables have this 
control word. In one compiler Citerak:r.tens have a similar control word; 
in another compiler they do not. It is often necessary to be cognizant of 
the presence or absence of control words and of the allocation algorithms 
used by the compiler when specifying data:sequences. 


Independent:data:sequence means one of the four expressions in the following 
list: | 


ie samples cten: name 

2a. tables name 

3. WULaAYs name 

4, Andependent:data:sequence , «ndependent:data:sequence 
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Muuyiname is a synonym for artray:item:name, (Tablesname is not a 
synonym for table:item: name. ) 


Independent: overlay: specification means one of the expresetons in the 
following list: 


De independent: data: sequence | 
0. Andependent: overlay: specification = independent:data: sequence 


Independent: overlay:deckaration means one of the three expressions in 
the following list: 


(e OVERLAY ileeaprtiamaiatiin $ 
8, OVERLAY mnwnbera = Andependent:overlay:spect{ication $ 
9. OVERLAY octal:constant = Andependent:overlay:snecification $ 


An Andependent:overlay:deckaration may be used to arrange 4imple:item, 
tables, and aviays in sequence; to overlay these Sequences on one another; 
and to assign these overlays to specific machine locations. Within the 
overlay:deckaration, data structures separated by commas will be given 
sequential locations in the order in which they are named and Sequences 
separated by equal:signsé will begin at the same location. If the overlay: 
sdeckanation contains a number or an octal:iconstant the common origin of 
the 4equences will be the location identified by the value of the constant; 
otherwise the common origin will be selected by the compiler not to conflict 
with other data or program storage. Examples: 


10. OVERLAY WORD'LIST = DUMMY, MESSAGE $ 
uae OVERLAY 1924 = UMPIRE $ 


The name of a data structure may appear no more than once in an overlay: 
:declanration, but it may appear in more than one overlay:declaration if 
logical inconsistencies are avoided. With most compilers the avoidance 
of logical inconsistencies means that any structure named in more than 
one overlay:declaration must immediately follow the mrunitive OVERLAY 
in all overlauzdeckanations in which it appears, other than the first. 


With some compilers, if a data structure derives itslocation, either 
directly or indirectly, from an overlau:dectanmation containing a constant, 
it must not be provided with initial values. With all present compilers, 
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data structures named in an overlay:deckaration mst first be defined: 
either pre-defined by COMPOOL, declared, or defined by mode. 


4,5 Complex Data Structures 


It is often necessary to specify more complex data structures than 4imple: 
sitems. Tables and aviays serve this need. An aviay is a one-(or more) 
dimensional arrangement of items all having the same <tem:name. The 
particular item out of the aviay is designated by means of an index 
having a number of components corresponding to the dimensionality of the 
aviay, A table is basically a one-dimensional arrangement (or list) of 
entries, the particular entry being designated by a one-component Andex. 
Each entry is a group of tems, each having a unique <tem:name. For 
example, ALPHA ($ 5 $) might be one of several items in entity 5 of a 
particular table, or it might be the only <tem in entry 5, or it might be 
element 5 of a one-dimensional avuy. There are exceptions in the 
structure of a table:entzy. For instance, a 4tr1ing:item, consisting of 

a linear arrangement of components called beads, can only be part of a 
tabkezentrzy. Thus a particular bead of a particular 4t1ing in a particular 
entry of a table would require the 4t1ing:ctem:name and a two-component 
Andex for complete identification. (String is a synonym for 4trtng:item). 


4.51 Constant: Lists 


It is sometimes desirable to specify initial values for all or part of an 
anvitay or a table when it is declared. Such initial values are specified in 
lists known as constant:Lists. A constant:List must correspond, in 
dimensionality, to the declared structure for which it specifies initial 
values. A one:dumenstonal: constant: List is the prunitive BEGIN followed by 
a string of optionally: signed:constants followed by the primitive END. 


A kspluszone: dimensional: constant:List is BEGIN followed by a string of 
kedimensional:constant:Lists followed by END. Below are three examples, 
a one:dimensionak:constant:List, a two: dimensionat: constant: List, and a 
three: dimensional: constant: List. 


1 e BEGIN -13 e 78 e 35 ® -~16 r Hy) e 64 e END 
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2, BEGIN BEGIN V(HI'OUTSIDE) V(HIGH) V(HI'INSIDE) END 


BEGIN V(OUTSIDE) V(STRIKE) V(INSIDE) END 
BEGIN V(LO'OUTSIDE) V(LOW) V(LO'INSIDE) END 
END | 
3. BEGIN BEGIN BEGIN ¢@ 111 9 END 
BEGIN 1 ¢6¢46 1 END 
BEGIN 1 ¢@¢6 1 END 
BEGIN 1 $66 1 END 
BEGIN 1 ¢@6¢4% 1 END 
BEGIN 1 4644 1 END 
BEGIN @ 111 96 END 
END 
BEGIN BEGIN ¢ 111 9 END 
BEGIN 1111 1 END 
BEGIN 1 141 1 END 
BEGIN 11941 1 END 
BEGIN 119461 1 END 
BEGIN 1 111 1 END 
| BEGIN ¢ 111 94 END 
END END 


At the present time the compilers are prepared to handle constant:Lists 
of no more than three dimensions. 


4.52 Arrays 


In specifying an aviay it is necessary to state the number of dimensions 
and the extent of each dimension. This is done by means of a dunension: 
sList, Dimension:List means a string of numbers, Array:deckaration 
means one of the expressions in the following list: 


1. ARRAY name dimension:List itemsdeseription $ oe 
2. ARRAY name dunension:List Atendeseription $ constant: List 


The name is the avuy:item:name., The number of nwnbers in the dunension: 
sist is the number of dimensions of the aviay. A one-dimensional aviay 

is a column vector. (Of course, the programmer may treat it as a row 
vector if he wishes). A two-dimensional aviay is a matrix, a row of 

colum vectors. A three-dimensional aay is a set of matrices. And SO 
forth. The (first) number in the dimension:List declares the number of 
elements in (each column of) the aiay, The second number in the dimension: 
2st declares the number of columns in a matrix or plane of the aviuy 
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(or the number of elements in a row). The third nwmber is the number of 
planes in a volume. And so forth, The number of dimensions of aviuys 
is, of course, limited by what the compiler is prepared to handle. Some 
compilers do not handle aviays at all. 


The dten:description in an aviay:deckaration applies to the whole avuy, 
to each element or component of the aviay. Thus, one might declare an 
way of booLean:items or a dual:attay, where every element of the aviay 
is a dual value with the same number of bits per component and the same 
number of fractional bits per component. 


If the awiay:deckaration contains a condstant:List it mist be of the 
dimensionality declared by the dimension:2£ist. However, it need not 
specify an initial value for every element. The values given are 

used to set elements starting with the first element of the aviuy, 

Thus, if we wished to specify only the first element of the first column 
of the front matrix of a 3 by 3 by 3 atay, the constant:Lust might 

be as follows: _ 


3. BEGIN BEGIN BEGIN 5 END END END 


to specify the middle element of such an Quay, it is necessary to 
specify other elements leading to it, as follows: 


4, BEGIN BEGIN BEGIN 1 END END 
BEGIN BEGIN 2 END 
BEGIN 35 END END END 


The 1, 2, and 3 specify initial values for elements we didn't care about, 
but we had to specify them in order to get a 5 initially into the center 

of this 27-element aviay. The 1 is the initial value of the upper left 

hand corner of the front plane (see figure 4). While looking at the figure, 
the reader should consider the order of indexing into this auiay, The 
components of the index used in referring to aviay:item are in the same 
order as the dimension mumbers in the dimension:List. Thus, the entries 
marked A, B, and C in figure 4 are indexed as follows (in JOVIAL, indexing 
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starts with g, not 1): 


5 A: 2,1,¢@ 
6 : G,2,¢ 
T C: 1,2 


It may appear that the index shown above | - a 
with the value 3 should be $,1,1 instead | LL. 

of 1,%,1. That would be true if the 

bracketing order within a constant:Lut 2 _ 
matched the order of components in an : 
Andex and the order of mumbers in a | 
dunension:£isé, It was felt desirable, 3 5 
however, to match two conflicting to. a 
conventions. The order of components 1 | 
in an index is in accordance with conven- | 

tional mathematical notation. It is also = ae 
desirable to write the elements of a tuo: 

sdamensconal: constant:2£4464 in the same | | 
arrangement in which they would appear | 7 

in a picture of the aay (compare the | 
arrangement of 2, 3, and 5 in the example | | 
with the arrangement in figure 4). In 
order to do this it was necessary to 
interchange the bracketing of rows and 
columns in constant:£i4t4 of two or more 
dimensions. Thus, in such a constant:List 
the innermost BEGINs and ENDs bracket elements of rows. rather than of 
columns. BEGINs and ENDs at the second level outward bracket rows of a 
matrix or plane. BEGINs and ENDs at the third nesting level outward 
bracket planes of a volume. And so forth. Nothing in the language 
specifies the order in which the elements of an aviay are to be stored 


in the computer, This is a compiler-dependent feature of the object 
code. | 


Figure 4. 
A 3 3 by 3 Array 
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4.53 e Matching for Pre-set Values 


As with a single constant given as initial value of a simmle:citem, 
each of the constants in a constant:£.st must be of a type which can 
be assigned to the associated tte, Furthermore, certain mixtures 
of type are allowed, while others are not. The permissible type 
mixtures of the constants given as initial values of indexed: 

:4tems are shown in figure 5. 


In 44xed:constants given as initial values of integer: fixed: or 
sLoating:itens, the seale after the A is ignored, the number of 
fraction bits to be utilized being picked up from the item: 
:lesctiption, Therefore, there is really no need to use {ixed: 
constants in a constant: List, 


Example: 
1. ARRAY MTRX 3 4 F $ 
BEGIN BEGIN 1 -~] g $ END 
BEGIN -1.5 Oss. ist $ END 
BEGIN ¢ g 1.2 -1 j$END-” END 
Item type Constant types 


Integer, frxed, or floating Integer, frxed, floating, or any 


mixtures of these three types 


Integer, fsrxed, or floating Octal 


Duak Dual 

Hoklercth or transniission: Hollercth, octal, or transmission: 
code | code, but not mixed 

Status StAtUs 

boolean dookean 


Figure 5. Constant Types for Pre-setting Itai 
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4.54 Tables 


The structure of a table is more complex than that of an avuiay 
although the possible number of dimensions of a table is more 
limited. In the complex structure of a table, variously described 
parts of the table have distinct names, These separately named 
parts of the table mast be declared within the table: sdeckaration. 


There are three kinds of table:declarations as follows: 


ae ordinary: table: deckaration 
26 desined: entry: table: declaration 
36 kike:tablLe: declaration 


There are subordinate declarations which can be used only within table: 
sdeckanrations. These subordinate declarations will be explained in 
sections 4.55 and 4.57 prior to putting them together into the three 
kinds of table:declarations. 


4.55 Ondinary: entries 
Ondanary:table:itemsdeckaration means one of the two following expressions: 


Ls ITEM name itensdescription $ . 
oe ITEM name iten:description $$ onesdinenssonal:constant:List 


The permissible <tem:descriptions are the same, and have the same meanings, 
in sample:ctensaeclarations and all other <tensdeckarations. (Sections 4.41 
and 4.42), The ordinary: table:item:deckaration declares, names, and 
describes an <tem for every entry of the table with which it is declared 

(as explained below). In referring to a particular c<tem in a particular 
entiy the <ten:name and a one-component index are used as in the following 
examples (indexing the entries of a tabke begins with zero): 


3. ALPHA ($ @ $) 
Mes BETA ($ I + 5. $) | 
cs. MESSAGE ($ ALPHA ($ K $) * 2 $) 


ore, 
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It may be that a particular <ten is not present in a particular entty 

of the table, but is present in subsequent entries. For instance, an 
overlay: declaration (as explained below) may be part of the tab£e: 
declaration. The compiler has no way, in general, of knowing which 
enttures contain which <tens, since this is determined by usage rather 
than declarations. In any case such information is ignored and indexing 
is accomplished as if every entity contained every declared <tem, 


A table:iten:declaration containing a one:dimensional: constant: List 
specifies initial values for the <tem in entries of the table. The 
first value is given to the tton in entry $, the second value to the 
Atem in entity 1, and so forth. No cognizance is taken that in actual 
usage this <tem might not exist in a particular entity. The number of 
constants in the constant: list may be less than the number of entries 
specified for the table (section 4.56), but there must not be too many 
constants for the number of entries. If there are not enough constants to 
complete the initial assignments, no values are provided for the ctem in 
the remaining entries at the end of the table. The specific values, at 
the start of execution, of <tems for which no initial values have been 
provided depend on the particular compiler. 


Subondinate:data:sequence means one of the following expressions: 


6. ondinary:tabLe: tem: name ‘ 
T. subordinate:dataz:sequence , Aubordinate:data:sequence 


Subordinate: overlay: specification means one of these two expressions: 


8. subordinate: data: sequence 
9. subordinate:overlay: specification = 4subordinate:data:sequence 


Subordinate:overlay:deckanation means 
10. OVERLAY 4ubordinatezoverlayzspecification $ 


Ondinary:entry:description means one of the three following expressions: 


Lis ondinary:table:cten:declaration a 
12, ondinaryzentry:description  ordinaryrentryzdescrcption 
13 ondinaryzentry:deseription subordinate: overlay:decktaration 
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In other words, an orxdinary:entriy:description is a string of 
ondinary:table:itemdectarations and subordinate: overlay: 
:declarations. The form is restricted in that all <tem:names 
appearing in any overlay:declaration in the entty:desceription 
must have been previously declared in tten:declarations occurring 
earlier in the same entty:deseription. An ordinary:entry: 
:description names and describes all the items which comprise a 
tables entry. A subordinate: overlay:deckaration within the 
entry:description arranges items of the entry -- items separated 
by commas will be allocated consecutive storage space within the 
entty in the order in which they are named, except that packed 
Atems may be rearranged for storage efficiency; sequences separated 
by equals: 44gns will begin at the same location within the entty. 
Note that a subordinate:overlay:declaration cannot specify an absolute 
location as origin of the data sequences, 


A name may appear in more than one 4ubordinate:overlay: declaration, 

but as with independent: overlay:declarations, logical inconsistencies 
must be avoided, Some compilers do not permit subordinate:overlay: 
:deckarations since the effect can be achieved by other means (sections 
4.57 and 4,58). 


4.56 Ondinary:tables 


Tables sizes specification means one of the two following expressions: 


is Vo nin 
2. R nin 


A table: sizesspecification declares the size of a table in terms of the 
number of entities in the table. The V means that the size of the 
table is variable; that nin is the maximum number of ent1ie4 in the 
fable; and that NENT (table:name) is a numeric:variable. The R 

means that the table is of a rigid size with nin entries and that 

NENT (tablLezname) is a numeric: forma but not a variable. It is 
dependent on the particular compiler whether the value of a variable 
NENT (tabLezname) is zero, nin, or undefined prior to being set by an 
asscgnment: statement or some other Statement. 
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Basic: structure: specification means the letter P or the fetter S. It 

is used to specify the basic structural pattern of the table, P declaring 
parallel structure and S declaring serial structure. Parallel and 

serial structure can best be explained in terms of the sizes of a 

table and its entries. From the previous paragraph we have that 

nin is the (maximum) number 
of entries in the table. 
Let n2n be the number of 
storage cells (computer 
words) in an entty. In 
serial tables there are 

nin consecutive blocks of 
storage, blocks being allo- 
cated to entries in numeri- 
cal order, and each block 
consisting of the n2n 


Serial Structure Parallel Structure 


MN control word MN control word 


lst half AB[¢] lst half AB[¢] 


2nd half AB[@] lst half AB[1] 


xY[@] 1st half AB[2] consecutive words of the 
half AB(L] Ist half AB[3] being mec er ga 
half AB[1] half AB[@] ee ae 
xy[1] half Ap(1] Pr age a teeter” 
half AB[2] half AB[2] tee eas oe a 


basic structure, may con- 

tain one or more control 

| words, The presence of 

xx{@] control words depends on 
the particular compiler 

xy[1] and whether the table is 

variable or rigid in size. 


half AB[2] half AB[3] 
xy[2] 
half AB[3] 


half AB[3] xy[2] 


daar ee The use of a basic: 
| XY[3] x¥[3] structure: specification 
| in a table:deckaration 


= F is completely optional. 
Example: Table MN has 2 items: AB and XY erga ae : 


and 4 entries: $, 1, 2, and 3. basic: structure:svnecif,ication, 
AB occupies 2 words, whether the table has parallel 
XY occupies 1 word. or serial structure depends 

on the compiler. In tables 


13 consecutive computer words are shown in with variable length entitles 
each illustration above. (section 4.58), the basic 
. ° ‘i . 
structure 


Figure 6, Serial & Parallel Tabfe Structure 
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must be serial, either declared or normal for the particular compiler. 


Packing: specification means the Letter N or the Letter M or the letter D. 
It is used to specify the packing of «tems within an entity of a table, 

N stands for "no packing" which usually means that each item occupies 

its own computer word or words without sharing it (or them) with other 
4tens. "No packing" does not preclude "overlaying." D stands for "dense 
packing" which may mean that <tens are packed together to utilize every 
bit in the word and minimize space. The interpretation in many compilers 
will relax “dense packing" somewhat. For instance, it is likely that 

an <tem which will fit in one word will not be packed so as to be 


Serial Structure 


MN control word 


ond word Sth word ES word | llth word 
3ra - word ) 6tn word oth word rs 12th word 
xe ae word E word | ath word 13th word 


Entry Entry 1 Entry 2 Entry 3 


Keerees 
wo 


—————— Parallel Structure 
MN control word 


Entry @ nd word | agen v0 word 
Entry 1 3rd word | Vaan werd aie a, word 
anaes ro renee er oa | eax — 
Entry 3 oth word ~ Vesiesc: Pou word 


CoeccececescsecvneeNesesecaseeveceves pea 


This illustrates the same example as figure 6. The same 
13 words are shown, but the blocks are drawn side by Side. 


arallel and Serial Table Structure 
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divided between two words and it may be that every <tem which will not 
fit in one word will begin at the left end of a word. M stands for 
"medium packing" which usually means that items are packed but not so 
closely that they share sub-register units. Sub-register units are 
the parts of a computer word which can easily be referenced in 

machine instructions: -=- parts such as half words, addresses, bytes, 
etc. 


Ondinary:tabLe:deckaration means the following structure: 


35 TABLE optional:name table:size:specrf{ication 
optional: basic: structure: speci,ication 
optional: packing:specification $ 
BEGIN ordinary:entray:desceription END 


The table need not be named if there is no occasion to refer to it, 
such as in an input: statement or an independent: overlay:deckaration. 
The 4izezspecif{ication tells whether the table has a variable or rigid 
number of entities and how many. The basic: structure sspecification, 

if present, declares the table to be parallel or serial. The packing: 
:specification, if present, declares medium or dense packing or none. 
The entry:descertption declares, names, and describes all the items © 
of the table and any overlaying among these items. 


Example: 


4, TABLE TB2 V_ 16@¢ : Nn $ 
BEGIN ITEM ALF H $ 
BEGIN 2H(PH) ou(##) 2H(U2) END 
ITEM NUM I 12 U 64... kos $ 
| OVERLAY ALF = NUM §$ 
END 
4.57 Defined: entries 


Defined:entry:iten:deckaration means the following expression: 


i. ITEM name dAtemdeserintion n3n n4n 
optional: packing: specification $ 
optional:one: dimensional: constant: List 


4.57 
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The elements of the above expression which are also included in the 
ondinary:table:item:declaration (section 4.55) serve the same purpose > 
here that they serve there. This deckaration occurs only within a 
tablke:deckaration (section 4.58) in which the number of words in an 
entiy is specified. In this declaration, n3n declares which word in 
the entty contains the <tem (or in which word the <tem begins). For 
this purpose the words are numbered starting with @. Thus, the words of 
a 4eword entity are numbered 9, 1, 2, and 3. The bit within the word in 
which the item begins is specified by n4n. The bits are numbered from 
the left starting with @. The <temsdesceription and the use of the 
optzonal: one:damenstonal: constant:Lrst to set initial values have been 
explained before. The packing:specif,ication may be used to provide 
information which may be useful to the compiler. It does not direct 
the packing of the tten, but describes the packing which results from 
n3n, n4n, the <temsdescription, and the situation of adjacent tems 

in the entry. 


String: ten:deckaration means the following expression: 


2. STRING name Aten:desertption n3n né4n 
optional: packing:specification n5n nbn §$ 
optional: two :dimensional: constant: L144 


The string: iten:deckaration provides the means by which an <tem can 
be declared, having more than one occurrence per entry of a table, 
Each such occurrence of a string:item is called a bead. To refer 
to a particular bead in a numeric: founula or a statement (beads 
need not be numeric) the iten:name is used, followed by a two- 
component index as in the following especie: 


a ALTITUDE ($ K-3 , 5 $) 


The first component, K-3 in the above example, indicates which bead 
within the ent1y., The second component, 5 in the example, tells 
which entry of the table. 


N3n and n4n, as in the defined:entry:iten:deckaration, tell in which 
word in the entity and in which bit in the word the item (that is, the 
first bead of the item) begins. The optional: packing: specification 
describes rather than directs the packing. N5n declares the 
frequency of occurrenceof the 4t1ing:iten in the words of the entry. 
That is, there are beads of the string in every n5nth word of the 


457 
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entry (starting with word n3n of course). N6n declares the number of 
beads in each word of the entry. Consider the following example: 


4, STRING ZEUS I 12 U @~@1.23 $ 


The above example declares that the beads of ZEUS are 12-bit unsigned 
integers, that the first bead starts in word $, bit 1 of the entry, 
that there are beads in every second word of the entiu, andthat there are 
3 beads in each word of the entty which contains beads. N4n (1 in this 
example) tells in which bit of the word is the beginning of the first 
bead in each word which contains beads. That is, not only does bead 

$ begin in bit 1 of word $, but also bead 3 begins in bit 1 of word 

2. Suppose that the example is embedded in a table declared to have 

3 words perentiy and that on this computer there are 48 bits per word. 
Then tigure 8 may be considered to be a partial illustration of entity 

4 of the table, 


A two:dumensdsonak: constant:List, if present, declares initial values for some 
of the beads of the string. The first one:dimensional: constant:List provides 
values for beads in entry O; the second one:dimensional: constant: list provides 
values for entty 1; etc. Within each one:dumensconal: constant: Lut, the first 
constant provides the initial value for bead @; the second constant provides 
the value for bead 1; etc. 


Vedrcned:entry:description means one of the following three expressions: | 


De deszned: entry: ctem:deckaration 
6. strng:Lten:deckaration — 
e defined: entry:desceription defined: entry:deserrption 


In other words, a degined:entry:descertption is a string of string: ton: 
declarations and defined:entry:iten:declarations. Notice that overlay: 
:deckanatzsons are not permitted in a defined:entry:desceription., They 

are not needed since the position in the entry of every «te is explicitly 
declared, including any desired overlaying or partial overlaying. 


4.58 Vesined: entry: tables 


Jeszaneds entry: tabLe:dectaration means the following expression: 

i TABLE optsonaki:name ftablersizesspecrfrcation 
cotrconakl: basrcer:stuucture:specisication  n2n $ 
PEGIN dekanedsentray:desertption END 


The tabte need not be named if there is no occasion to refer to it. 
The 44zessvecasication indicates a variable or rigid number of entites 


4.58 
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and how many. The basic:structure:spectf{ication, if present, declares 
parallel or serial table structure. N2n declares the number of words 
per entity. The entry:desertiption declares, names, and describes all the 
Atems of the table and defines their positions within the entries. 


Notice that n2n is now required, to state the size of an entity. Since the 
string: tem: deckanation declares an unlimited number of beads, the size 
of an entity can only be determined by this explicit means. However, nZn 
is really only a nominal or assumed entty size. The compiler uses n2n 
(and, of course, nin, the number of entries) to allocate space for the 
table ~-- n2n blocks of nin words or nin blocks of n2n words depending on 
the basic structure. See, for an example, figure 7. Suppose the ptogiam 
containing the table shown in figure 8 has a reference to ZEUS ($6, 4 $). 
By the structure of the table there is no such bead. The compiler, 
however, will use the table structure to determine the beginning of 
entry 4 and the <tem structure to determine the position of bead 6 with 
respect to the beginning of entty 4. Hence the reference will be to a 
bead of ZEUS in what would seem to be the middle word of entry 5. 


Such a reference as we described in the last paragraph is permitted. A 
tabke to which such references are made is considered to have variable 
length entries. It is even permissible to declare a string:ctemn or 
tabLe:z.tem to begin in a word of the entty which, by n2n, doesn't exist. 
That is, n3n may be equal to or greater than n2n. Again, the table 
structure will be used to find the beginning of a referenced entity 

and n3n will be used to find the cten, 


For tables with variable length ent1ies the compiler takes no extra pains 
beyond what has just been described. Therefore, it is up to the programmer 
to be aware of the differences between his conception of the table and 

the way the compiler treats it and to write his ptogram accordingly. 


Entity 4 


TABLE 19 S 3 3 BEGIN STRING ZEUS I 12 U @ 12 3 ¢ ED 


et 


“icure 3. Entar 4 of a Table 
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Among the things which must be considered: 


2. The table mist be of serial entry structure. This 
is so even if there is only one word per entry. 
Consideration of figure 7 shows that for a serial 
table, for all entries except the last, a reference 
beyond the end of an entty spills over into the 
next entry. For a parallel table, on the other 
hand, a reference beyond the end of an entry is a 
reference completely outside the block allocated to 
the table. 


3. In assigning preset values and in interpreting 
Andices, every declared item is considered to 
be associated with every entty of the table regard- 
less of conflicts due to overlays. For example, 
you may know that there is no ALPHA in entry 7 
because GAMMA ($ 6 $) actually occupies that space, 
but the compiler doesn't know it. When referring to the 
next ALPHA that does exist, it should be called ALPHA 
($ 8 $) and not ALPHA ($7 $). | | 


4. The programmer must provide for any extra incrementing 
that may be necessary while indexing through a table 
by means of a Loop:statement. For instance, some 
such coding may be required as below: 


FOR Q = $, 1, NENT (Xxx) -1 $ 


BEGIN 
IF SIZE ($ Q $) EQ 2 $ 
Q=Q+tl1 $ 
END 
De It is probably necessary that the nominal entity size, 


n2n, be a divisor of each of the various actual entty 
sizes that the programmer has in mind for the particular 
tabke. If each of these "actual" sizes is not a multiple 
of n2n, there will be wasted space in the table or the 
required programming adjustments will be impossible, or 
both. Of course, one way of satisfying this requirement 
is to use the value 1 for n2n, 
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4.59 Like:tables 
Like:table:declaration means the following expression: 


is TABLE name optional: table: sizersvnectsication 
optional: basin: structure: spect{ication 
optional: packingsspecif{ication L$ 


The L just before the dollar:4ign declares this to be a table with 
an entity structure "like" a previously declared and named table 

(or a pre-defined table), the "pattern" table. The name of the 
Likez:tabke is formed by suffixing a numeral or Letter to the 

name of the pattern table. The item of the Like:tablLe are then 
automatically named with the <ten:names, similarly suffixed, of the 
pattern table. The composition and structure of the entries of 

the Like:table are generated by the declarations describing the 
entries of the pattern table, with the difference, of course, of 

the numeral or Letter attached to each <teniname. Table:size, basic: 
structure, and packing can be specified for the 2ike:table, but if 
this information is omitted, the specifications of the pattern table 
are used for these characteristics, . 


4.6 Files 


A fckesdeckaration is used to name and describe a {le on some hardware 
device used for input and/or output and to declare the status:constants 
to be used in designating the various statuses of the 4ile. A few 
preliminary definitions are required. 


Frkerstructurerspecisication means one of the following expressions: 


i H non Vv a«alfn 
ae B non Vv nin 
34 H n9n RR wvnlgn 
4, B non RR nign 


Status:£14£ means a string of one or more Status:constants. 


FrLez:dectaration means the following expression: 
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5. FILE {ilername filerstructure:specification 
status? List device:nane $ 


The f4lesname is a name chosen by the programmer and hereby declared 

as a 4dlesname. Hollertth:frcle structure, declared by an H, means that 
the Aecords of the file are composed of characters or bytes encoded in 
whatever manner is normal for the storing of alpha-numeric information 

on the device. Input or output involving hollercth: files and hollerith: 

or transnnrsscon:code:varsablLes is permissible; any necessary code 
conversions will be included automatically. If the variables are not 
holkerrth or thansmcission:code, however, the effect of input/output 

with a hollerith:42le is undefined. Input/output with a binary: file, 
declared by a B, and any kind of variable is accomplished without any 

code conversion. The number n9n declares the estimated maximum number 

of Aecords in the file. The abbreviation V declares a variable Aecord 
size; the abbreviation R declares a rigid 2ecord size; and nifn declares 
the (estimated maximum) number of bits in a Xecord (for a binary: file) 

or bytes in a A2ecord (for a hollerith: 4ile). 

The various possible statuses of a 4ile, such as "busy," "ready," and 
"error," are associated with numeric values by the compiler. The 
programmer declares a List of Status:constants to be defined, respectively, 
as these values, starting at zero and going up by ones. These 4fatus: 
constants are then meaningful only in context with the 4iLe:name, which 
functions as a Status:cteniname, but only as specified for 41lesnanes 

in boolean: formulas and in suitch:deckarations. There must be at least 

one Status:constant in this List, but there need not be as many as there 
are meaningful values. 


The device:name mist be in the form of a JOVIAL name, but the programmer 
does not choose it. Such names are permanently assigned to the various 
input/output devices available. The use of one of these names as a 
devace:name does not prejudice its use in some other way, such as an 
Atem:nane or statement:name, but it would be incompatible with definition 
of the name by means of a define:dinective. 


One should consult the documentation for a particular compiler for the 


list of device:nanes and the statuses which apply to the various input / 
output devices. 


4.6 
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Example of a jdLe:deckaration: 


6, FILE SNAP H 266 #V 129 


V(READY) V(BUSY) V(ERROR) V( EOF) 
TAPES | 


4.6 
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Chapter 5. Processing: declarations 


5el Introduction 


Unless otherwise directed (section 6.2) every ptognham begins execution 
with the first statement of what may be called the main: program, 
Statement execution then proceeds sequentially except for iterations 

of Loop:statements and jumps due to go:to:statements, conditional: 
statements, and alternative: statements. In (almost) every ptognram, 
however, there are groupings of statements or other elements of the 
program to which execution control cannot or must not pass sequentially, 
but only through invocation of the group or element by name. Such 
groups or elements are defined as processing:declkarations. 


A statement or group of statenents which is blocked from sequential 

access only because of the presence of go:to:statements, conditional: 
:statenents, or alternative:statements is not thereby a processing? 
:deckaration. 


The following list enumerates all the processing:declarations: 


oe program: declaration 7 

2% Awitch: declaration | } 
3% cLose:declarnation 

4, procedure:deckaration 

re function: declaration 


—~+5.2 Program: declarations 
Progham: dectanation means one of the following expressions: 


ae PROGRAM names $ | 
oe ' PROGRAM name number $ 
3. ' PROGRAM name octal:constant $ 


Notice that the primitive introducing the above expressions is spelled 
with a leading prune. A prognamedeclaration serves to establish 
communication between the present ~iogram and another program, named 

in the declaration and compiled independently. The integer:or octal: 
sconstant declares the machine address of the beginning compiled location 


Dee 
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of the named ptogram, The presence or absence of the constant 
depends on the compiler and the operating system in which it is 
embedded. If the system supplies the machine location and if it 

is not desired or not permitted to override this given location, 

the constant is omitted. When transfer to the named program is 
specified by means of a go:to:statenent, the compiler assumes that 
the named program is a subroutine which will return control to the 
Statement following the go:to:statement; and that the values of any 
Loop:vanriables which are active at execution of the go:to: statement 
will be undisturbed upon return from the subroutine. 


A program declaration is a processing: declaration since it names a 
group of statements to which control can be transferred. However, it 
shares with data:declarations the property of not directly generating | 
any machine language coding; it can occur among the statements of a 
progham without affecting the order of execution. 


5.3 Switches 


A Awitch:declanation includes a list of sequencerdesignators , but 
program: name is not permitted among them. These s4equence:designators 
specify points to which execution control may be transferred, depending 
on the value of an item or an index. Switch: declaration is therefore 
divided into the following categories: | 


1. ANARX3 switch:deckaration 
2. Aten: suitch:deckaration 


A suttch:deckanation causes the generation of machine language instructions 
which are to be executed only when the 4uitch:name is invoked by a go:to: 

sstatement or another suiich. Therefore, a switch:deckaration should occur 
only in a position, relative to sfatanents, such that ordinary sequential 
execution cannot reach it; for example, in the positions indicated below: 


3% ® 


STOP ¢ 
switch:deckaration 


XYZ =z=5 $ 
GOTO statement:name $ 
Auttch: declaration 


563 
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If, in some system, the 4fop:statement shown above dashes any hope of 
continuing, then the positions shown for switch:declarations are all 
right. If, on the other hand, it is possible to continue in sequence 
after the stop, then the first switch:declaration in the example should 
not be in such a position. Some versions of the compiler, however, 
always prevent "falling into" a switch, 


A suctch:declaration within a Loop:statenent must not be invoked by a 
go:to: statement nor via another suwitch:declaration outside that Loop: 
sstatement, For more details see section 3.76 on processing: declarations 
within Loop: statenents. 


5.31 Index:suctches 


Index:suctch:List means one of the following expressions: 


a Aequence:designator 

2 » sequencesdesignator 

38 Sequence:designator , 

h, Andex:suiteh:List , Andex:switch: Lut 


PAogram:names must not be among the 4equence:designators in a Surich: 
List, 


Index:suktch:declaration means: 
58 SWITCH name = ( index:switch:£List ) $ 


The name in the above expression is thereby declared to be the switch: 
sname, Following is an example of an index:suctch:declaration: 


6. SWITCH TOGGLE = (BL97, , LOOP, EMIT ($1,J$),) $ 
To invoke an index:suitch, the switch: name with a one-component index 
is the sequence:designator in a go:to:statenent or another suitch, For 


example: 


re GOTO TOGGLE ($4 $) $ 
8. SWITCH CHOOSE = ( , , ST#1 ($ ALPHA $), TOGGLE ($x$) ) $ 


NS 
° 

(a 
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The <ndex in a reference to an index:suitch must be within the range 
indicated by the sucteh: List in the declaration. The index value 
points out the required sequence:designator according to its position 
in the list, starting with zero. Commas without corresponding | 
4equence:designators indicate values of the index for which no 
transfer of control takes place. Thus, GOTO TOGGLE ($ ¢ $) $ effects 
a transfer to BLO7. If the reference to TOGGLE ($ K $) is activated; 
for K = 2 control is transferred to LOOP; for K = 3 control is trans- 
ferred via switch EMIT -- where EMIT is an <tem:switch dependent on 
values of a 4t1ing:iten or two-dimensional atiay, in this case bead or 
entry ($ I, J $); for K = 1 or 4 control is not transferred, but is 
returned to the Statement following the invoking go:to:statement; and 
K must not be more than 4, 


5.32 Item:surctches 
Item: switch: £1464 means one of the two following expressions: 


1. constant = sequence:designator 
26 dtemsuitch:List , itemsswitch:List 


Program: names must not be among the sequencerdesignators in this kind 
of sucitch:2Ust, either. 


Iten: sucttch:declaration means one of the following expressions: 


( itenssukteh:List ) $ 
( itemsswiteh:List ) $ 


3. SWITCH name ( Atenename ) 
4. SWITCH name ( fdLesname ) 


The name following the primitive, SWITCH, is the suitch:name. The 

Atem: suitch:L16< consists of constants paired with sequence: 
sdesignatons, The constants are possible values of the ctun 

named in the declaration. When the switch is invoked, if the value 

of the <tem matches one of the constants, execution control is trans- 
ferred in accordance with the corresponding AeGUENCe: designator, If the 
4tem value doesn't match any of the constants, execution continues with 
the statement following the invoking go:to:statement. 


Example of an <tom:surtch:declaration: 
5. SWITCH WHICH (BETA) = (3H(ARY) = ST34, 3H(@L9) = FINIS($A/23), 


3H( =) «= SMl, 3H(ABC) = S@2, 3H(''') = EXIT, 3H(===) = Sl, 
 3BH(.$.) = ESSO($A, B,C$), O(777777) = ST#1, 3H (XOX) = PCR'SORT) $ 


Awa 
® 
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If a 44te is named in the declaration, the constants are status: 
sconstants from the 4(Le:deckaration representing conditions of the 
file. If the switch:declaration names a {ile or a simple:item, 

any reference to the 4uctch omits an index. If the suwitch:declaration 
names an indexed:item, reference to the switch includes an index 

(of the appropriate number of components) to select the particular 
bead or entry of the iten to be compared with the constants, For 
example: 


6. GOTO WHICH ($J, K, L, M$) $ 


This go:to:statenent implies that BETA (the item named in the declaration 
for WHICH) is a four-dimensional auiay. 


5.4 Closes 


CLose:declaration means the following expression: 


le CLOSE name $ BEGIN 4tatement:2ist END 


ClLosezdectarations, as well as procedure: and function:declarations, 
provide the means for setting up groups of 4fatements as subroutines 

to be called upon or invoked from various points in a program. A close: 
sdeckaration may invoke procedures or functions or other close:dectarations, 
but there must be no recursive calls. That is, no subroutine may call 
itself nor any other subroutine which in turn calls it, either directly 

or indirectly. The name in the above declaration becomes the close: 

- Nae. 


A ckhose:deckaration sets up the statenent forming its latter part as a 
closed subroutine without parameters. As with a surctchideclaration, a 
cLose:declaration should not be placed in such a position among the 

Atatenents of a proaram that the execution seauence can "fall into" it. 


The processing specified by a close:declaration is executed when the 
cLosezname is invoked by a go:to:stateunent, either directly or via a 
Auutch, Normally, after execution of a close:declaration, control 


Beg 
® 
Seng 
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returns to the s4tatenent following the invoking go:to:statement. It is 
permissible, however, for there to be a go:to:statement, within the close: 
:deckaration, which jumps to an entirely independent point in the ptogran. 


A chose:declaration within a lLoop:statement must not be called by a 
go:to:statement (nor via a surtch:deckaration) outside that Loop: 
Statement. <A chose:declaration outside the Loop:statement should be 
invoked from within the Loop:statement only if the close:declaration 
will not return control to the Loop:statement. See section 3.76 on 
plocessing: sdeclanations within Loop: statements for more details. 


5.5 Procedures 


A procedure:declaration sets up a closed subroutine which may have 
Anput:parameters or output: parameters or both. A procedure:deckaration 
is independent of outside loop:statements; it may be invoked from within 
any Loop:statement in the main:prtogrzam or in other processing declarations 
without deactivating the Loop:variables. On the other hand, the outside 
Loop:variables are not defined in the procedure: declaration. 


Some preliminary definitions are needed. 


Deckaration:List means one of the following expressions: 


re data:dectanration 
2. «pro gnam: declaration 
34 ~—ddeckaration: List declaration: LUu4£ 


Foumal: input: parameter:2ist means one of the expressions in the following 
list: 


4, sample: rte: name 

De VULAY? name 

6. table: name | 

T. cLosezname . 

8, forumak:inout:paraneter:2ist , formal:input: parameter: List 


Note that a closezname in a fonmals input: panametenr:List is followed by 
a period. In fact, it is the presence of the period in a formal:input: 
spanametenr:List that defines the preceeding name as a closeiname. 


Formal:outnut: varameter: ist means one of the expressions in the following 
list: 
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9. Sample: tem: name 

LO. VULAY3 name 

1l. table: nane 

12. Statement: name 

13. fonmal: output: parametern:List , fonumal: output: parameter: List 


A statement: name in a forunal:output: parameter:List must be followed by 
a pertod; it is the presence of the period that defines it as a statement: 
sname, 


Procedure: heading means one of the following three expressions: 


14, PROC name $ optional:declaration:List 

15. PROC name ( optional: formal:rnput: parametern:List ) $ 
optional: declaration: List 

16. PROC name ( optional: formal: anput: parzametern:List = 


formal:output: parameter:List ) $ opttional:declaration:List 
Procedure: body means 
17. BEGIN 4datement:List END 
Procedure:declaration means 
18, procedure: heading procedure: body 


The S5tatement:Lust of a mocedurie:body is restricted in that it must not 
contain any procedure:declarations nor function:declarations. Thus, 
procedure:declarations cannot be nested, although it is permissible for a 
procedure:declaration to contain procedure:call: statements or function: 
:calls, There must not be any recursive calls, however, That is, a 
procedure must not call itself nor any close, procedure, or function 
which calls it in turn, either directly or indirectly. 


If the procedurez:heading contains formak:parameters other than close:names and 
statenent:names, they must be declared in the procedure:declaration before 
they are referenced in statements. 


The name following PROC becomes the procedure:name. A procedure:deckaration 
sets up a closed subroutine (or procedure) which is invoked by a procedure: 
:cakl: statement. Normally, when execution of the Statenent:Lit is : 
completed or a Aeturin:statenent is executed, control returns to the 
statenent which follows the invoking procedure:cakl: statement, If there 

is a go:to:statonent or suitch executed, which references a statement: 


=>) 
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swame declared in the formual:output: parameter: fist, control returns 
to the statenent labelled with the corresponding name in the actual: 
soutpnut:paranetern:L1st. Therefore, output: parameter: statement: names 
are called alternate exits. Under these circumstances, as control 
passes from the procedure, actual:output: parameters corresponding 

to simpLe:iten:names in the foramal:output: parameter:List are assigned 
the values calculated by the ptoceduie. It is possible, however, for 
the procedure to contain a go:to:statement or switch which references 
a statement:name in the main:program, If control passes to that 
main program statement through execution of such a go:to:statement 

or 4uxtch, then the final assignment process is bypassed and the 
actuak: output: parameters corresponding to the sunple:ttem: names 

among the foumLl:output: paraneters are not changed. It is also possible 
that lLuop:variables in the main:program which were active at the time 
of calling the procedure, will not have their correct values. See 
section 3.55 for more details on the usage of input:parameters and 
output: parameters . 


5-6 Function:declautions 

A function:declkaration is very similar to a procedure:deckaration; so 
much so in fact that the same primitive, PROC, is used to introduce 
both. | 


Function:heading means one of the following expressions: 


i% PROC name $ optional:declanration: List 
2. PROC name ( optional: formal: sci at parameten:List ) $ 
optional: declaration: hLi1st 


Function: declaration means 
3 function: heading procedure: body 
A function:deckaration is distinguished from a procedure:declanation by 


the presence, in a function:declaration, of a simple: iten:declaratin 
declaring an iten with the same name as the function:deckaration, It is 


this <ten with the matching name that is to carry the value of the 


junction. This iten is to be treated, within the function:declaration, 
as the sole outnput:vasameter although the function:deckaration does not 
provide for a sonmals outmut: paraneter: 214. 


ee 
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The type of the ita which acts as the output: paraneter determines the 
type of fotunla represented by a function:cal2, The discussion in section 
3.55 concerning <nput: parameters applies to function:deckarations and 
corresponding jsunction:calls. 


Function: declarations may contain procedure:call: statements or function: 
calls, but not recursively. Functcion:deckarations must not contain 
function:deckarations nor procedure:declarations. A function:deckaration, 
just as a procedure:declaration, is independent of outside Loop: 
statements. 


If the fumetion:heading contains formmal:input:parameters other than close: 


snames, they must be declared in the f{unction:declaration before they are 
referenced in 45tatonents. 


526 
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Chapter 6. Programs 


6.1 Other PLOgrams 


In section 5.2 we discussed the means whereby comminication can be 
established between the present ptogram and other ptograms compiled 
independently. Assumptions are made about the characteristics of the 
"other" ptograms, but there is no universal means for informing the 
compiler that the "present" p10giam is to be compiled in a manner to 
make it a ptogiam of this "other" sort. For some compilers there may 


be compiler-dependent declarations or directives for accomplishing 
such a result. 


If the compiler recognizes that this pAogram is of this other sort, an indepen- 
dently compiled subroutine, it will most likely treat the 4top:sftatement as an 
indication to return control to the external calling program. 


6.2 The Present PAO GLOM 


The plogram means one of these two expressions: 


Ls START statement:List TERM $ 
2, START statement:List TERM statenent:name $ 


In other words the program is a string of statements, declarations, 

and directives (see statement:List section 3.6) enclosed in the brackets, 
START and TERM, and followed by a dollar:sign or a Statenent:name and a 
dollar: sign. 


If there is no 4fatenent:name following TERM, execution of the object 
program will begin with the first statement of the main:ptogram, Other- 
wise, the name must be that of a statement of the main: program and execution 
will begin with that named: statement. | 


6.3 Darnectives 


We have already discussed the define:dinmective (section 2.8) which makes 
it possible to direct the compiler to treat a name as an expression of 
one or more 4ymbols, There is another ditective, the mode:directive, 
which directs the compiler to change the mode for definition of otherwise 
undefined names. This is discussed in the next section. 
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6.4 Mode:dinectives 
Mode:dinective means one of these two expressions: 


oe MODE <ctemedescription $ 
26 MODE <temdesceription P optionally:signed:constant $ 


Each compiler assumes a normal mode for the definition of undeclared 
or otherwise undefined 4imple:item:names. The presence of a mode: 
:dinective causes the compiler to change the current mode to be in 
accordance with the item:desctiption. If a pre-set value is also 
specified, all subsequent mode-defined items will be given this value 
initially. 


The effect of a mode:diective begins at the point where it occurs 
among the statements and declarations of the program and lasts until 
the next mode:dinective or the end of the ptogram (TERM) is encountered. 
The new mode is established and persists irrespective of whether the 
mode:dinective occurs in the min: program or a procedute: or 

function: declaration. 


6.5 Bcope of Definition of Names 


There are over twelve million names available to JOVIAL programmers if 

we consider only those with no more than six letters and numerals, 
Nevertheless, programmers seem to concentrate on a very few out of these 
millions. The designers of JOVIAL have catered to this tendency by 
providing for duplication of names in accordance with the criteria explained 
below. 


Loop:variables are not names; yet the scope of their definitions is of 
critical importance. This is explained in detail in sections 3.75, 3.76, 

and 3.77. ‘In connection with loop:vartables, "defined" means the same as 
active. | 


In status:constants the names within parentheses have no connection with 
names used elsewhere in the program. There need be no concern about 
duplication except that there must be no duplication among the 4tatus: 
constants associated with any particular 4tatus:item or file. 


6.5 
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Following a define:directive, any occurrence of the name thereby defined 
will be effectively replaced by its definition, with these exceptions -- 
the name may be redefined by a new define:dinective; there will be no 
replacement where the name occurs as part of a Status:constant, Literal: 
constant, or comment; the name will be replaced where it appears within 
dinectiassigns but not elsewhere in divect:code. 


Let us now consider the names in the program after all effective 
replacements in accordance with define:directives. The names fall into 
three categories as follows: 


om devicesnames (used only in file:declarations) 
26 Statement:namnes, pigraminames, clLoseznames, surctch:names 
35 dtem: names, tabke:names, frcleznames, procedure:names, function: nanes 


A name used in one of the above three categories may duplicate a name 
in one or both of the other categories without conflict or ambiguity. 


There may even be duplication within a category if the elements so named 
have non-overlapping scope. "Scope” has reference to the setting off of 
parts of the program in procedure:declarations and function:declarations. 
In general, a name which is defined in a particular way just within a 
procedure: or function:deckaration is said to be "local" to that procedure: 
or function:declaration. All of the ptogram which is not part of a 
procedure: or function:deckaration is the main:program, A name which 

is predefined or defined within the matn:program is said to be "global." 


Vevacesnanes are all predefined and there is no way to define them within 
the ptogram, Therefore, devace:nanes are always global. 


All types of names in the above three categories may be predefined (by 
COMPOOL or otherwise). All names of categories 2 and 3 may be explicitly 
defined -- statenent: names by being properly prefixed to 4fatenents or 
cLauses; the others by declarations; and statenent:names and closeznaines, 
locally, by appearing as jotumnal:paraneters. 


Predefined names are global. Names explicitly defined in the man: }nognran 
are global. If an explicit definition in the matn:progrxam conflicts with 
a predefinition the voredefinition is nullified. Conflicting global 
definitions in the matin:prcgnaii are not allowed. hanes explicitly defined 
within a jrocedure: or function:deckuration are local to that particular 
wmocedure: or functtion:deckaration. This includes all founatl: parameters. 


CN 
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Conflicting local definitions within a particular procedure: or function: 
:declaration are not allowed. A name, local to a given procedure: declaration, 
must not be used as both a formalirinput: parameter and a founal: output: parameter. 
A procedure: or function:name is both global and local to the procedure: or 
funcetiton:deckaration which it names. One seeming conflict in naming 

is not only permitted but required -- a junction:decklaration must contain 

a simplLe:cten:declaration duplicating the function:name. 


The scope of a local name is the procedure: or function:deckaration 

in which it is defined. The scope of a global name is the main: 
sprogram and all procedure: and function:deckarations which do not 

have local definitions of the same name in the same category. Consider 
figure 9 for example. As device:names, T1l2 and T13 are predefined 

and global; their scope is the whole pwogram, Assume that the other 
definitions are made explicitly as shown in the main: ptogram or 
procedures. Then, with respect to figure 9A, T12 is: 


Ls as a S4fatement:nane, global; and its scope is the 
Matn: progran and procedure Pe, 

2. as a table:name, global; and its scope is the 
niadin: program and procedure Pl. 

a6 as a clLosezname, local to procedure Pl. 


4, as an iten:name, local to procedure Pe. 


With respect to figure 9B, T13 is: 


De as a Auxtchiname, global; and its scope is only the main: program, 
on as a procedure:name, both global and local to procedure 
T133; its scope is the entire ptogran, 
Te as a Statenent:name, local to procedure 113. 
Oi as a program:name, local to procedure P3. 


Reference to any defined nanie, as in a go:to:statement, an assrcgnment: 
sstatenent, or a procedure:call:statement, may be made only from within 
its scope. 


Programsnames, Atemmmames, tablesnames, and 4Lernames which are to be 
defined by declaration must be declared before they are used in their 
respective scopes. 


CN 
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Definition by mode is possible only at points in the program for which 
there is no other definition, for the particular name, in category 3. 
Thus, any name which is predefined in category 3 cannot be redefined 
by mode. Otherwise, a name may be defined by mode as a global 4xmple: 
:itenzname only if there is no global declaration for that name in 
category 3. A name may be defined by mode as a local 4imple:cteniname 
only if there is no category 3 declaration for that name in the same 
procedure: or function:declaration and no prior global category 3 
definition for that name (either by mode or by declaration). 


A. START Main: pro gram 
T12 (device:name) | 
T12 (statement: name) 
T12 (tablezname) 


PROC Pl 
T12 (chosesname ) 
PROC P2 et 
T12 (Atem: name) — 
TERM $ 
B, START Main: po gham 


T13 (device: name) 
T13 (surctch: nae) ooo 
PROC T13 (procedure: name) 

T13 (statement: name) 


PROC P3 
T13 (program: name ) 


TERM $ 


Figure 9. Scope 
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Index and Glossary 


Three kinds of words are indexed below: English or programmer's 

jargon, metalanguage words and phrases, and JOVIAL primitives. Two 
kinds of references are given: numbers of sections where the word 

or phrase is used and numbers of sections where it is defined. Defining 
section numbers are typed in script.* For example, see the entry for 
abbreviation below. The term is defined in section 2.5; it is used 

in sections 2.4, 2.5, 2.7, 4.41, and 4.6. For the main index listing 

of metalanguage words and phrases, all references are indexed. For 
English words or jargon and for subordinate listings of metalanguage 
words and phrases, usually only defining references are indexed. For 
prumtives all references are indexed. Since these words are pruntives 
there can be no definitions. 


Many terms are defined partially or completely in this index (glossary). 
Such definitions are intended as reminders for people who are already 
familiar with the language. Others should consult the defining section 
to avoid overlooking important exceptions and qualifying remarks. It 

is also necessary to be familiar with the rules concerning the use of 
4pace’ as explained in section 2.2. Defining expressions or remarks 
are indented under the word or phrase to which they apply. Expressions 
with the same level of indentation are alternate definitions or different 
ways of saying the same thing. In some cases there are second, or even 
third, levels of indentation to define the definitions. Lines of the 
index are numbered at the left except that a line which is merely a 
continuation of the previous line is not numbered. 


1. abbreviation 24 Led Col 441 


4 6 
2. ABS 2.5 3.33 3.34 
3. accumulator | 3,71 
4, actual: Anput: parameter 3.55 
ee UUiaYy: name 4.43 
6. clLosezname . 
Te Zormula 
8. table: name : 
9. actual: input: parameter: List Lee. 3531. 3253 


10. actual:input: parameter 

11. actual:input: parameter , actual: input: parameter: List 
12. achuarsoutput: paraneter 3255 949 
L3s WU LY snamne ° 
14, Atatementinaie . 

15. tablLesname 

lc. variable 


x Defining section numbers are also underlined 
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1. actual:output: parameter: List 1.2 3,55 5.5 
26 actual: output: parameter 
3% actual:output:paraneter , actual: output: 

sparameternsLrt 
4, actual: parameter 3.31 3.55 3.75 
De actual: 4nput: parameter 
6. actual: output: parameter 
T. actual: parameter: foramla 3.55 
8. founla in actual:rnput: parameter: List 
9. actual: parameter: List 1.2 3.55 
10. actual:input: prraneter:List 3,55 
ll. actual:output: parameter:Lust 3.55 
12. actual: paraneter: name 3.55 
13. Any of the following nameS when occurring in 

an actual: parametern:List, In the reference 

in section 3.55 i<tenzname is obviously not 

included: - 
13. aviuy: name 4,43 
14, cLosezname 5.4 
15. 4tem: name 
16. statement: name 3s4 
Lt table: name 
18. actual: parameter: table 3.55 
19. a table, the name of which occurs in an 

actual: parameter: List 
20. actual: parameter: variabLe 3.55 
21. varrable in actual: parameter: List 
22. ALL 20D 3.74 
23. alternate exit 3.75 525 
24, output: parameter: statement: name 
256 Statement: name in output: parameter: Lust 
26. alternative 3.73 
27. onzdfi:ckause Andependent: statement 
23. 4tatenent:name . alternative 
29. alternative: List Seid 
30. Afsetthersckause rndependent:statenent alternative 
31. alternative:List alternative 
32. alternative: statement 3.7 32473 5.1 
33. akternatiwe:lut END 
34. AND Zo “2630 
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arithmetic: operator 
+ 


ARRAY 
aniay 


105 


2.4 


% 


/ 


%% 


re 
3.1 3.22 3.33 3.56 4.4 
4.52 4 
collection of data 
declared by an avuy: 
sdeckaration 
essentially equivalent 
to avuy:item, but 
aviay has the conno- 
tation of the group 
of data 


ll. aviuay:deckaration 


le. 


13. 


13. 


14, 
lope 


16. 


Lv. 
18, 
19. 
20. 
el. 


Co. 
C3. 
ah, 


WULAYy? name 


ARRAY name dunensson: List 
Atenzdeseription $ 

ARRAY name dimension: List 
Atemsdesceription $ constant: List 


specification of a one or more 
dimensional, rectangular array 
of similar data values 


avriay:4tem 


collection of data declared 

by an aviay:deckaration 
essentially equivalent to avumy, 
but aviay:item has the conno- 
tation of a member of the group 


aviay: iten: deckanation 


avriay:declaration 


wvuy:ctem: name 


Avi y? nane 

nane following ARRAY in an 

aray: declaration 
3.55: 3.56 
array rcten: name 

sane following ARRAY in an 

anray: declaration 


3.34 


3.21 


3.33 


4.43 
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1. ASSIGN 
2. assignnent: statement 3.1 3.24 3.5 3,57 


3.5 
3.71 3.73 4.4 
36 variable = formla § 
4, statement specifying 
that the value of a 
variable be changed 
to the current value 
of a forma, The 
vauiable and fornula 
must be of compatible 
data types. 
5. bascerstructure 4.59 
6. property of a table being 
parallel or serial. Serial 
means the words of an entiy 
occupy a contiguous block. 
Parallel means the words of 
an entiy are similarly 
placed in separate blocks. 
T. basic:stucture: specification 4.56 4.58 4.59 
8. P for parallel 
9. S for serial 
10. part of a table:declauation | 
11. bead 4.5 4.57 4.58 5.31 5.32 
12. a particular occurrence of a 4tting:cton, 
specified by a two-component index, the 
first component indicating which bead 
within the ent&iy, the second component 
indicating which entry of the table. 


13. BEGIN 2.5 2.7 3.4 3.6 3.72 3.73 3.7% 
4.52 4.52 4.53 4.56 4.58 5.5 

14. binary: file 4.6 
15. dhe, declared with B following the {£e: 

sname, in which data are represented with 

the same bit patterns that are used in the 

internal memory of the computer 
16. BIT 2.5 3.24 3.26 
17. bit 2.61 
18. binary digit 
19. @orl 


20. basic unit of information 
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bLank 
Space 
the JOVIAL character represented 
with no ink on the paper 
boolean | 2.61 3.2 
pertaining to the algebra of truth 
values 
having one of two possible values, 
"true" or "false," represented by 
l and @ respectively. 
boolean: constant 
6 


1 
boolean: formula 3.35 3,36 3.51 3.72 3.73 
boolean: constant 
boolean: function 
boolean: variable 
rekational proposition | 
combination of boolean: formulas with 
parentheses and boolean:operatonrs 
boolean: function 
invocation of a function:declaration 
with a boolean output value. 
boolean:atem 
dtem specified by declaration in which 
B follows the <tem:name 
boolean: tem: description 


B 
boolean: operator 
AND 
NOT 
OR | 
boolean: variable 2.61 3.27 3.36 
boolean: item 7 
ODD ( Loop:variable ) 
ODD ( named:nuneric:variable ) 
bracket 2.4 3.33 3.34 
BEGIN END 
DIRECT JOVIAL 
IFEITH END 
START TERM 


/) 
($ | 


3.23 


4 42 


3.91 


3.51 


3.52 


6.2 
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1. BYTE | 2.5 3.26 
2. byte - 3.26 
3. computer representation of one character 

| of a hoklerith or transmission: code value | | 
4, CHAR | 2.5 3.2h 


5S. characteristic 
(68 integral part of a logarithm 
Te exrad, by analogy with logarithms 


8. clause 3.72 4.1 6.5 
9. for: clause 

10; complete: for:clause 3.14 
ll. Aneomplete: for: clause 3,74 
12. Af:clause | oel2 3,73 
13. df<z:ercther:clause | 3473 
14, «ond fk :chause 3.73 
15. CLOSE | 2.5 54 
16. chose 5.4 55 
17. ckosesdeclaruation | 5.4 
18. close:declaration 3.53 3.54 3.75 3.76 5.1 5.4 


19. CLOSE name $ independent: statement 

20. a subroutine without parameters, 
sensitive to the scope of definition 
of for:variables 

21. clhose:name 3655 3.75 3.76 4.1 5.4 5.5 5.6 6.5 

22, the name in a clodse:deckaration | 
following the prunctive CLOSE 


oe comma 2.3 3.22 4.43 4.55 5.31 
C4. 
25. comment 2.2 2.4 2,5 2.7 2.8 6.5 


26. '' Sagns '! 
ef. equivalent to 4pace in most 
places : = 
28. complete: for:clause 3.74 3.77 
29. FOR Loop:vartable = numerte: founda, _ 
numeric: foumla, numeric: founla §$ 
30. FOR Loop:variable = ALL (tabLe:nane) §$ 
31. FOR Loop:variable = ALL (Ztable:item:name) $ 
32. complete:Loop: statement 3.74 3.77 
33. complete:for:clause  -Andependent:statenent 
B34. © completerforzclause special: compound 
35. complete:forz:cLause  neomplete:Loop:statenent 
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1. complex 3.6 
Qe pertaining to a complex: statement 

3. complex: statement 2.1 3.4 3.7 3.71 
4, alternative: statement 3,73 
oy conditional: statement 3,72 
6. dinect: statenent 3,71 
T. Loop: statement 3,74 
8. COMPOOL 4,2 
9. communication pool 

10. a table or dictionary of syeten definitions 

11. compound 3.6 
12. pertaining to a compound: statement 

13. compound: statenent 2.1 3.4 3,6 3.72 
14, BEGIN S5tatement:List END 

15. conditional: statenent Sef Def2 -3.73- S01 
16. Af:cekause Andependent:statenent 
(17. constant 2.4 2.6 2.61 2,63 2.7 3.1 3.28 

3.3 3.56 3.71 3.73 44. bebe 4.43 
4.51 4.53 4.55 4.57 5.2 5.32 6.4 

18. boolean:constant 2,63 
19. dua: constant 2,63 
20. literal: constant | 

21s hoLlLerrtth: constant 2,63 
22, octal: constant 2.63 
23. transmission: code: constant 2.63 
2h, numeric: constant 

25. sixed: constant 2.63 
26. sLoating: constant 2.63 
2(4 Anteger: constant 2.63 
28. octal: constant 2,63 
29. status:constant 2.63 
30. constant: Lrs5t Re52 64.52 «24.53 4.55 
31. dimensioned list of constants for pre- 

setting values of table:rtems, strings, 
and aAWiays 

32. onesdunensional: constant: List 4.51 
33. twosdunensional: constant: List 

34, ete. 4.51 
35. data:declaration 2.1 4.2 4.4 5.2 5.5 
36. s4Rerdeclaration 4.6 
37. r«ten:declaration 4.4 
38. <Andexed:cten:declaration 4.4 
39. anay:rAten:deckaration 4.52 
LO. string item: declaration 4.57 
Wl, table:iten:declaration 

he, sdmple:iten: declaration 4.42 


43, overlay:deckaratrion 
hu,  table:declaration 4.54 
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1. data:sequence 443) 4055 
2. Andependent:data: sequence 4.43 
36 subordinate: data: sequence 4,55 
4, part of overlay:declaration 
4g decunal: point ne 
T. declaration 2.1 3.1 3.2 3.21 3.24% 3.51 3.54 
3.55 3.6 3.76 4.1 Ge 4.54 4.55 
4.57 4.59 5.2 5.31 5.32 5.4 6.1 
6.2 6.4 6.5 
8. data:declaration 4,4 
9. processing declaration SJ 
10. declaration: List 5 5.6 
11. datazdeclaration 4,4 
12. prognamdeclanation 4 
13.  deckaration:sList declaration: List 
14, DEFINE 2.5 2.8 
15. definesdirective 2.7 2.8 4.6 6.3 6.5 
16. DEFINE name ''signs'' $ 
17. defined 2.8 6.5 
18. with respect to Loop:variable: within its 
active range 
19. ###with respect to name: given a meaning oe 
a scope within a ptogiamn 
20. defined: entry 457 
21. tablezentry for which the location of 
each item is specified by the programmer. 
22, defined: entry:desceription 4.57 4.58 
23. defined: entry:iten:declaration 4.57 
2h, sdtring:itendeclaration 4.57 
25. definedzsentry:description definedsentry:description 
26. defined: entry:iten:declaration 4.5] 
27. defined: entry:tabLe 4.58 
28, table declared by a defined:entry:tablesdeckaration 
29. defined: entry: table:deelaration 4.54 4,58 
30. description Wohl 44 4.43 
31. Atomnsdesceription : | 
32. device:name 4.6 6.5 
33. a compiler-—dependent name permanently assigned 


to an input-output device for which a {4le may 
be declared 
34. dunension: List 4.52 
a string of nwnbers; part of an arvidy:deckaration 
36. DIRECT 


2.0 
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1. directiassign 2.8 3.71 6.5 
2. ASSIGN A(signed:nwnber) = namedsvariable $ 
3. ASSIGN named:variablLe = A(Signed:nunber) $ 


4, direct: code 2.8 3,71 6.5 
De AAgnds | 2.3 
6. dinect:assign A 
Te dinect:code dinrnect:code 

8. dinect: statement 3.7 3.7] 
9. DIRECT dinect:code JOVIAL 

10. directive 2.1. 3.6 61. 6.2 6.3 
ll. definez:dinective 2.8 
12. modesdinective 6.4 
“ —— 2.5 3.4 3.54 4.59 6.2 
iL e 

15. dual 2.6] 3.2 3.23 3.34 3.51 4.52 


16. pertaining to data forms and 
values having two components 

17. dual:array | | 4.52 
avity whose declaration contains 
a dual: iten:deseription | 

18, dualsassignnent: statement 3.51 


duakziten = dual:f{ounla §$ 
19. dual:condstant 2.63 3.34 4.41 
20. dual: exchange: statement 5652 


21. dual:item == dualziten $ 
22. statement specifying that the values of 
two dual:itens be exchanged 


23. duak: formla 3.1 3.34 3.35 3.36 3.51 
24, numeric: foumula 5655 
25. dual:constant 2.63 


26. duak:.tem 
27. duak: function 
28. arithmetic combinations of dual: formulas 
29. dual: function 3.34 
30. invocation of a function:declaration with 
a dual output value 
31. dual:xtem 4D 
32. tem specified by declaration in which 
the <tem:name is followed by D or a 
dual: constant 
33. dual:xctem:descrintion 4, 
34. dual:relation: List 
35. list of relational:operators and 
duak: Lounlas | 
36. dual: specifier 4.4] 


WN 
° 
Ww 
LS») 
W; 
e 
Ww 
On! — 
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1. dual:variadle 
> 2s dual:item 
3. END 2.5 3.4 3.6 3.72 
4.51 4.52 4.53 

4, ENT 

5 ENTRY 

6. entry 3.22 3.24 3.28 3.33 

4.430 4,5 4.55 4.56 

7. one occurrence of an avuy:ton; 
which one specified by an index 

8. the set of all the «tem of a 
table with the same second component 
of the index in the case of 4t1ings 
and the same index in the case of other 
Atems | 

9. entry:assignnent: statement 

10. entryzvariable = entry: foramla § 

ll. 4tatenent specifying that the value of an 
entiy:variable be changed to the current 
value of an entiy: formula 

12. entray:deserription 

13. defined: entry:descrrtption 

1k. ordinary: entry: descrrption 

15. entry: forunla 3.32 

16. @ 

17. entry:variable 

18, entrysandex 

19. Andex used to specify which entry of 
aviay or table 

20. entry:variable geLS 3.32 

21. ENT (tablezname ($ index $)) 

22, ENT (table:itemsname ($ index $)) 

23. ENTRY (dablezname ($ index $)) 

oh, ENTRY (table:iten:name ($ index $)) 

25. EQ 2.5 2.7 3.35 3.36 

26. equals: sign 

els = 

28. exchange: statenent 
variable == variable $ 

29. express 

30. global 

31. exrad 

32 


3.34 


3.13 
4.56 
205 


3.35 
4.57 


exponent of the radix in floating representations 


of numbers 
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4.56 


3.36 


3.51 


3.92 


3.77 
505 

3.52 
3.28 
3.56 
4.59 
532 


3.51 
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1. FILE 2.5 4.6 
2. file 2.6 3.6 3.24 3,56 3.57 3.58 4.2 
4.6 532 6.5 
3 a collection of “ecords 
on an input or output device 
4, 6 fResdeckanration hey 446 5432 6.5 
5. f4lesname 2.63 3.1 3.24% 3.36 3.56 3.57 3.58 
| 4.6 5.32 6.5 
6. name following FILE in a 
filesdeclaration | 
T. 42e: ee eee 4.6 
8. H yunber number 
9. B yuumber ; number 
10. H vumber R number 
a13 B yunber R nwnber 


12. 44xed 2.61 3.2 3.33 3.51 3.71 4.41 
13. pertaining to values with 

a specified number (which may 

even be zero or negative) of 

bits after the binary point 


14, 44xed:constant 2.63 4.53 
15. 44xed:item 4.53 
16. 4tem specified by declaration 

in which the <temsname is followed 

by a 4ixed:itenz:descerctption or a 

s4xed: constant 
17. f4xedziten:description 4.4] 
18. 4ixed: specifier | 4,4] 
19. 44xed:variabLe 2.61 3.2 3,25 
20. £4xed: item 
his MANT (4Loating:Aiten) 
22, floating 2.61 3.2 3.23 3.31 3.33 3.51 “abe 

ot] 


pertaining to values (v in the 
equation below) represented by 
two numbers (s for signicand 
and e for exrad in the equation 
below) 


e 
vVv=s x2 


where s = gor |s| = 1/2 or 1/2 < |s| <1 
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1. floating: constant 2.61 2,63 4.41 
2. floating: item woud 4.53 


3a Atem specified by declaration 
in which the <ten:name is 
followed by F or a §loating:constant 


4, 4Loating: item description 4.41 
5. floating-point 

6. floating 2,61 
T. floating: variable 3.2 3.24 3.25 
8. floating: item 

9. FOR 2.5 3.74 3.75 4.58 
10. f0r2 clause 3614 3505. 3.16. Salt 
ll. complete: for:clause 3,74 
12. <Ancomplete: for:clLause 3,74 
13. for-variable | 25 
14, Loop:variable | 2,5 3,74 
15. formal: input: parameter 3600: 960. “OeD 
16. aviay:nane 4.43 


17. closesname . 
18. 4samnole:rteon: name 
19. table:name 
20. formal: input: parameter: List i.e: Het 525 "SiG 
21. formal: cnput: parameter 
22. formalsinput: parameter , fovunal:input: parameter: List 
23. formals output: parameter 3599: -De> 6 
24, aviayz:name 4 
25. 4samplesiton: name 
26. 4tatemnent:name . 
27. tableznane 
28. 4oumal: output: parameter: List 1.2 441 5.5 5.6 
29. jounal: output: parameter 
30. formnaLroutput:narameter , formal:output: parameter:Lrust 
31. honmal: parameter 3331, 3255. 4e3. 5.9 «O55 
32. forunal:input: parameter 
33. foramalsoutput: parameter | 
34. founal: parameter: item 3.55 
35. an <tem, the name of which occurs in 

a formal: parameter:t14t, In the 

reference in section 3.55, obviously 

only sunple:ctens are meant 
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formal : parameter: List 
formal: input: parameter: List 
Zounal: output: parameter: Lut 
formal: parameter: tabLe 
a table, the name of which occurs in a 
formals paranetenr: List 
fovunta 3.1 3.22 3.3 
boolean: formula 
dual: formula 
entry: formula 
Literal: formula 
holLlerith: formula 
transmission: code: formula 
nuneic: foruula 
status: foumla 
function 2.6 3.1 3,31 
invocation of a function:declaration 
by name 
function:deckaration (context will 
make it clear when this usage is 
intended ) 
function: cake 
function 
function: declaration 


3.31 


3.31 3.51 3.54 
Del. ‘Sah 
function: heading 
function: name 
name following PROC in a 
function: declaration 
functional: modifrLer 
ABS 


2.4 


NENT 
WWDSEN 
ODD 
POS 


3.1 


3.35 
3.74 
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1. global | 4.3 6.5 
2% defined within the matn:nrogram and 

those procedures without a conflicting 

local definition 


3. gozto:statement 3.5 3,53 3.54 3.75 3.77 5.1 5.2 
5630s 55 BL 5082 54 COSCO 
k, GOTO name $ 
5. GOTO name ($ index $)$ 
6. directs the sequence of 4tatanent 
executions elsewhere 
T. GOTO 2.5 2.7 3.53 3.6 3.72 3.73 3.7% 
5-3 5-31 5.32 
8. GQ 2e9 83.435 
9. GR 2.5 3.35 3.36 3.73 3.74 
10. hollerith 2.61 2.63 3.2 3.23 3.26 3.31 3.35 
3.51 3.58 4.6 
LL pertaining to the computer-dependent 
internal encoding of 441gns; the normal 
encoding scheme for the computer 
12. holkertth: constant | 2.2 2.61 2.63 3.32 
13. munberH( signs ) 
1h. the number of 4igns is numb 
15. hokkercth: file | 4.6 
16. ¢4he, declared with H following the 42<le:name, | 
in which data are represented as strings 
of 44ans coded in hollercth : 
17. hollercth: formula S552 
18. hoklerith: constant 2.63 
19. hoklercth: function | 
20. hoklerith:variable 
21. octal:constant 2.63 
22, hollercth: function 3.32 
23. invocation of a functson:declaration with a 
hol£erith output value 
2h, hollerctn: itemdeseription 4.4] 
25. EH number | 
26, hollencth: variable 3.2 3.32 4.6 
27. = hokRReracth:zten 
28. item specified by <ten:declaration 
in which H follows the <ten:nane 
29. BYTE ($ index $) (holLercth: ten) 
30. adeognam 2.4 2.5 2.7 3.33 3.56 4.u2 
31. i? 2.5 2.7 3.4 3.72 4.58 
Co Afi cdause 3.72 3.73 3.74% 3.77 


33. IF boolean: forma $ — 
34. Astatementinane . L42clause 
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Afi ether: clause 
IFEITH boolean: formula § 
IFEITH 
AneompLete: for: clause 
FOR Loop:vartable = nwneric: founula $ 
FOR Loop:variable = muneric: forma , 
Aneomplete: Loop: statement 
Loop: statement headed by s<neomplete: for:cLauses 
Andependent: data:sequence 
a string of 4unple:cten:names, table:names, 
and @Ulay:names separated by coms 
part of an independent:overlay:deckaration 
Andependent: overlay 
the arrangement of tables, arviays, and 
SaAmplez:r.tems specified by an 
Andependent: overlay: declaration 
andependent: overlLay:deckaration 
independent: overlay: specification 
a string of independent: data: sequences 
separated by equals: 41gns 
part of an independentiovertayrdectaration 
independent: statement 3.72 
conpound: statement 
BEGIN 4statement:Lrust 
sample: statement 
Andex 


2.5 


numeric: fouula $ 
3.74 


3.13 


END 


3.22 3.24 3.26 3.28 3.53 
4.52 4.55 4.57 4.58 5 
nunerre: forunla ? 
Andex , nuneric: formula 
Andex: switch 
4uctch specified by an index:surich:declaration 
Andex: suitch: declaration 
SWITCH switch:nanme = (Adndex:switch: Lut) $ 
Andex: suctch:L14t 


4455 
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1. Andexed:iten 4.53 5.32 
2% array: tem 
3% table:rtem 


\, defined: entry: ten 

5. ondinary:tablLe:iten 

Ox string item 

7. Andexed:iten:declaration 4.4 


oy aviay: ten: declaration 

9. tablLe:iten: declaration 

10. séndexed:variable 3.2 3.22 3.23 3.24 
ll. name ($ index $) 

12. Andexedsitem 


13. INPUT 2.5 3.57 
14. 4nput: operand 5256. 3651 
15. auayiname 4.43 


16. tablezname 

17. tablLeznane § ($ index $) 

18. table:name ($ index ... index $) 
19. vartable 
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1. input: paraneter 3.76 5.5 5.6 
an actual: input: paraneter 
3. formal: input: parameter 
4, the values and structures, specified or 
to be specified, for a procedure:declaration 
or function:deckarnation to work with 


5. Anput: parameter: List dee. 3595 

6. actual: input: parameter: List 3,55 

Te formal: cnput: parameter: List 5.5 

8. input: statenent 3.5 3.56 3,57 3.58 4.56 

9. INPUT §24lezname Anput:operand $ 

10. integer 2.61 3.2 3.23 3.33 3.51 4.41 

ll. a whole number 

Ee having whole number values 

13. «nteger: constant 2.63 3.71 4.41 5.2 

14. integer:c.tem 442 4.53 

15. «tem specified by declaration | 

in which the ctemzname is 
followed by an tnteger:iten:descertption 
3 or an tnteger:constant 

16. «nteger:cten: description 4.4] 

17. Antegerz specifier 4,4] 

18, integer:variabLe 3.2 3,24 3.33 3.74% 3.75 

19. <«nteger:rtem 

20. oop:variable Pe 

21. BIT ($ index $) (ten ) 

22. CHAR (floating: tan) 

23. POS (f<leznamne) 

oh, NENT (name ) 

25. ITEM 2.5 4.42 4.55 4.56 4.57 

26. «tem 3.1 3.2 3.21 3.22 3.24 3.26 3.28 
3.33 3.55 3.74% 4.2 4.3 441 4.he2 
4.4304.5 4.53 4.55 4.56 4.57 4.58 

4.59 5.3 5.32 5.6 6.4 


27. Aten may be subdivided in two 
independent ways shown in groups 1 
and 2 below. Even finer division is possible 
by choosing adjectives from both ‘groups as in 
SAmple: booLean: 4teni 

28, Group l 

29. booLean: Ltem 

30. dual: item 
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ai Lrtenak: tem 

2. hokLertth: ten 

3% AnansmssA0n: code: item 

4, numeric :4tem 

De fixed: tem 

6% floating: ten 

To Anteger:rctem 

8. status tem 

96 Group 2 

10. Andexed:ctem 

114 array :4tem 

12 tablezrtem 

13. defined: entry:ctem 

14, ordinary: table: zten 

15 string :Atem 

16% sample: ten 

17. data structure specified by an item:declaration ; 

18. «tem: declaration 3.2 3.21 4.4 Ykl 4,55 

19. Andexed:iten:declarnation 4,4 

20. aviay:.ten: declaration | 4,52 

21 tablLe:iten: declaration an 

226 defined: entry:item: declaration . 4.57 

23. ondinary: table: item: declaration 4.55 

2h, string :iten:declaration 4.57 

25. Admple:item:declaration 4,42 

27. ttemdesceription Wout 44a 4.52 4.53 4.55 . 57 «6.4 

28, oe Aton: description 4.4] 

29. 

30, ink citdéiaiiie 4.4] 

31. fdxedsatemdeseription 4.41 

32. fkoating:cten:deseription 4.4] 

33. hollercth: ctan:deseription 44] 

34, H nuniber 

35. A«Anteger:iten:deseription ; 4.4] 

36. tMansncsston:code:iten: description 4,4] 

Bir T number 

38. part of an i<tan:declaration 

39. itonzname 2.63 3.1 3.33 3.55 4.5 4.55 4.57 
4.59 4.6 5.32 6.5 


40, name following ARRAY or ITEM 
or STRING in an tten:deckaratizon 
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1. Atem:switch 5.31 «625.32 
2. suctch specified by an ttem:suctch:declarnation 
3. Aten sucteh:declaration 5.3 065.32 


4, SWITCH switch: name 

(f4Lername) = (itensuitch: List) $ 
Ds SWITCH surtch: name 

(itenzname) = (Litem suctch:List) $ 
6. Atemesuctch: List 5.32 
te constant = sequencesdesignator 
8. Atemzsutteh:Lut , Ltenzsuiteh: Lit 
9. JOVIAL 2.5 3.f1 
10. r:dinenstonal: constant: List 4.51 
11. BEGIN string of Reminus:one:dinendsional: 

sconstant:L1$t4 END 


12. k:plus:one:dimensional: constant: List 4.51 
13. #BEGIN string of R:dunensional: constant: 
:L16t6 END 

14, een 2.3 24. - 2.63 3.71 

15. 

16. Letter 1.2 2.3 2.5 2.62 2,63 3.74 
4.56 4.59 6.5 

17. library 4,2 

18. a collection of subroutines which may 

be incorporated in new ptograns 

19. Like:table 4.59 

20. table declared by Like: table:declaration 

21. kike:stable:declaration 454 4,59 

22, List 3.55 4.6 

23. condtant:Lut | 

eh. parameter: List 

25. statenent:List | | 2.6 

26. status: List | 4.6 

el etc. 

28. Literal 2.6) 2.63 3.35 3.52 

29. hokkerith 2.61 

30. octal, depending on context 

31. transmrsscon:code 2.6] 

32. Literal:assignient: statenent 3.51 

33. L&terar:variabdle = Literal: forma $ 

34. Literal:constant 2.7 2.8 6.5 

35 hollerith: constant 2,63 

36. octal:constant 2.63 


37. thansrusscon: code:constant — 2.63 
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1. Litenal: formula 3.32 3.35 3.36 3.51 
2. hoLlertth: forma | : Pes 
36 transmission: code: foramula 3.32 
4, Litenal:rtemn 3.26 4.43 


oF A4tem specified by <ten:declaration 
in which the <tem:name is followed 
by H (for hollerntth ) or T (for 


transmission: code ) 
6. Litenal:rclation: List 3.35 3.36 
Te list of relational:operatons and 

Literal: formulas 


8. Literal: vartable 3,2 3,26 3.51 3.52 
9.  hollerith: variable | 
10. tunsmission: code:variable 


11. ‘LOC | 2.5 2.f 3.33 
12. local 4.3 645 
13. defined only within a ptocedure 
14, Logical: operator | 2.4 3,36 
L5. AND 
16. NOT 
LT. OR 
18. Loop:statenent 3.54 3.7 3.74 3.75 3.76 3.77 4.58 
: : Sok. Sid O64 5e> (556 
19. a string of for:clauses 

followed by an independent: statement 

or Special:compound | 
20. Loop:variablLe 2.4 2.5 2.63 2.7 3.24 3.27 3.54 

3.74 3.75 3.76 3.77 5.2 5.5 6.5 

21. Letter following FOR in 

a for:clause 
22. LQ 265 3.35 
23. LS 2.5 3.35 3.36 3.72 3.73 
2h, main: program Tc ne a Ps PY OP Pe) 


25. all of the pAogram which is not part of any 
procedure:deckaration or function:deckaration 

26. MANT Geo). Beco 

27. mantissa 

28. fractional part of a logarithm 

29. Signicand, by analogy with logarithms 

30. marie Zoo 255 
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metalanguage 
a mode of expression which transcends 
language 


a language used to explain or describe 
another language 
MiNUS 2 S4.9N 


MODE 
mode: directive 
MODE c<tem:deseription $ 
MODE Atem: description P constant $ 
modr4r1er 
functional:modifr.er 
nin 
a nunber 
the (maximum) number of entries 
specified for a table 
n2n | 
a number 
the nominal number of words per entty 
of a table 
n3n 
a number 
the index of the word of the entity 
containing an <tem, or in which the 
4tem begins 
n4n 
a number 
the index of the bit of the word in which 
an <temn begins 
n5n 
a number 
the increment from word to word of an 
entity containing beads of a string:1tem 
non 
a number | 
the number of beads in each of the words of an 
entry containing beads of a 4tring:item 


3.51 


3.2h 
Lek 


bod 


4k 


n7n 4d 
a number 
the number of bits or bytes specified for 


an item or for each component of an ten 


4.56 


4.57 


4k 


4h 


rae 


bbl 
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1. n&n yoyo Wh 

2. a number 2.62 

3. the number of fractional bits specified = 
for an item or for each component of an item 

4, non | Tt eae 

Se a number 2.62 


6. the estimated maximum number of “records 
ina 4rke 
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1. nlgn uo OG 

2. a number 2.62 

3% the (estimated maximum) number of bits 

or bytes in a record 

4, name 2.4 2,5 2.63 2.7 2.8 3.1 3.21 3.22 
3.24 3.28 3.31 3.33 3.4 3.53 3.55 3.73 
3.74 3.75 3.76 3.77 4.1 4.2 4.3 4d 
4.42 4.43 4.52 454 4.55 4.56 4.57 4.58 
4.59 4.6 5.1 5.2 5.31 5.32 5.4 5.5 
5.6 6.2 6.3 6.5 

5. named:boolean:variable 3.27 

6. booLean: item 

T. named: f1xed:variable 3.25 

8, 42Axeds item 

9. named:integer: variable 3.2h 

10. Anteger:iten 

ll. named:Literal: variable 3.26 

12. &teral:iten 

13. named: nuneric:variable 3.27 

14. = fdxedzitem 3 

15. floating:rten 

16. <«nteger:item 

17. naned: statement 3.33 3,4 6.2 

18, name , statenent 

19. named: variable 3,2 3.23 3.2% 3.26 3.71 

20. boolean:ztem | 

al. duak:iten 

22. f4xed:iten 

23. floating: tem 

24, Anteger:ctemn 

25. kiterak:aton 

26. statusziten | | 

27. NENT 2.5 3.24 3.33 3.74 4.56 4.58 

28, NOT 2.5 3.36 

29. NQ 2.5 3.35 3.36 

30. number 2.62 2.63 4.4 boul 4.43 4.52 4.6 5.2 


31. a string of num 
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E 


2.3 2.5 2,62 2.63 4.590 6.5. 


2. Q 

Se L 

4, 2 

De 3 

6. \ 

Te 2 

8. 6 

9. T 

LO. 8 

ll. 9 

12, numeric 2.61 2.63 3,33 3.34 3.35 3.52 3.71 
4.57 

- 64xed 267 

14. sLoating | ] 

15. Anteger ua 

16 octal, depending on context 

17. nuneriarasscgnnent: statement 3.5] 


18, = munerieczvariable = numeric: formula $ 


19. numeric:constant 3533 
20. fixed: constant 2.63 
2l. pLoating: constant 2,63 
22. Anteger: constant 2.63 
23. octal: constant 2.65 
2h. numeric: formula 3.1 3.22 3,33 3.34 3.35 3.36 3.51 

3.74 3.75 4.56 4.57 
25. numeric: function 3033 


26. invocation of a function:declaration 

with a nwyeric output value 
27. numeriarelation: List 3459 3636 
28, list of relatronal:openators 

and numeric: formulas 


29. numericzvariable 3.0 3633 (B65. 3x52 <6 
30. hAxed: variable re, 
316 jtxed: item 

32. MANT ( §Loating:4ten) 

33. AhLoatina:vartabke 

34. {Loating item 

35% Anteger:varsable | 3,24 
36% Anteger:r.temn 

Te Loop:varr.able Pm TK 
30% BIT ($ 4ndex $) (tte) 

39. CHAR (4Loating:4ten) 

hO. POS (44Lernane ) 

41 NENT (name) 


ho. MNWOSE! 2.5 2S 
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1. octal 2.61 3.33 3.35 3.51 
2 represented by octal: nwunerals 

3. octal:constant 2,63 3.32 4.42 4.43 5.2 
4, O(string of octal: munerals ) 

? —ene 2.3 2.61 2.63 
Te 1 

8. 2 

9. 3 

10, 4 

ll. 5 

12. 6 

13. T 

15. ODD 2.5 3.27 
16. one:dinensional:constant:List 4.51 4.55 4.57 
17. BEGIN string of constants END 

18. onezfactonr:forsclause : 3.74 3.77 
19. FOR lLoop:variablLe = numeric: foramla $ 

20. OPEN 2.5 3.57 3.58 
21. onenzinput: statement 3.5 3,57 


22, OPEN INPUT {ile:name $ 

23. OPEN INPUT {ilesname inputzoperand $ 

2h, openz:output: statement 3.5 3,58 
25. OPEN OUTPUT {ilezname $ 

26. OPEN OUTPUT {iLesname outputzoperand $ | 

27. opensstatenent 3.58 


28. openstnput:statenent 2 VY gol 
29. openzoutput: statenent | 3,58 
30. operand 3.56 3.58 
31. 4Anput:operand 3.56 
32. outnut:operand 3,56 


33. there are no other references in this document, 
but operand also means constant or variable 


34. operator 3.36 
35. logareal:operator is the only reference in this 
document 
36. ovtronal 2.62 3.71 4.4l 4.56 4.57 4.58 
De. or 

37. optronally 2.62 2.63 3.71 4.412 442 4.51 6.4 
38. OR | 255° 3436 
39. ora ficlause 3,73 


4O,  ORIF boolean: formula $ 
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1. ordinary:entry | | 4.55 
2. entry of an ordinary: table 
3. ordinary:entry:descertption | 4.55 4.56 


4, the set of iten:declarations and 
overlay:declarations in an 


ordinary: table: declaration 
5. ordinary: table 4.56 
6. ere specified by an ordinary:table: 

:de n 
T. onrdinary:table: declaration 454 64,56 
8, ordinary:table: item: declaration | 4.55 4.57 
9. ITEM name Ltendescription $ 
10. ITEM name Ateon:desceription $ 

one: dimensional: constant: Lut 
11. onrdinary:tablLe: item: name 4.55 
12 name following ITEM in an ordinary: 

stable: iten: declaration 
13. ORIF 3.73 
14. OUTPUT 3.58 
15. output:operand 3.58 
16; auiay? name 4,43 
17. constant 2,63 
18, tablLe:name 
19. tabLezname ($ index $) 
20. tablezsname ($ index ... index $) 
Ql. vartable 
22. output: parameter 5.6 
23. actual: output: parameter 
Oh, formal: output: parameter 
Oe the values and structures for a 

procedure:declaration to produce 
26. output: parameter: List 3.55 
27 actual: output: parameter: List uted 
28, formal: output: parameter: List 542 
29. output: parameter: statanent: name 505 
30. Atatenent:name in output: parameter: Lest 
cae name which is followed by pettod in 

output: parameter: Lr4t 
32. output: statenent 3458 
33% OUTPUT 44lLername outnut:operand $ 
34. OVERLAY 4.56 
35. overlay:deckanation Lb 57 
36. Andependent: overlay: declaration 4.43 
37. subordinate: overlay:dectanation 4499 
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packing 
the sharing of computer words by disjunct 
Atems, This is done only for table:itens and 
may be prescribed by packing: specifications 
packing Specification 
D 


M 

N 
parallel 

fable structure in which there are several 

blocks, one for each word of an entty. The 

words of a particular entity are distributed 

over these blocks, one per block, and similarly 

placed in each block 
parame#ter 

Ant: parameter 

output: parameter 
parameter: Lr4t 

Anputs parameter: LU4t 

output: parameter: L142 
panenthesrzs 


( 
) 
pertod 2.3 


2.4 2,63 3.31 3.34 


2eT 3433 3.55 


plus sSLQNn 
ro 


POS 
precision 
number of bits after the binary point 


cd 


prane 2.3 
fan | 267 
4 


2.4 2 
re ae 


3.36 


PLUN tw e 


PROG 

muocedure 3055 3.475 
subroutine defined by a procedure: 
:declaration;sometimes (not in this 
document) also by a function: declaration 


2 
3 4. 
mn 


457 


3.36 


kd 
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1. procedure: body 7 545 5eG 

2. BEGIN statement:2ist END | 

3. procedure:call: Senk 365 3499 3.76 hel 96D 5.6 

:statenent 6.5 
4,  procedure:deckaration 3.54 3.55 3.75 3.76 4.1 4.2 4,3 
| | Sel 6 65e4k 55 5G GCS 

5. «procedure: heading 545 

6, procedure: name 349): 2959 655 

Tea name. following PROC in a | 

procedure:declaration 
8. processing:declaration 2.1 3.53 3.54 3.76 5,7 ae a3 
De ry) 

9. cLosesdeclaration 544 

10. function: declaration 546 

ll. procedure: declaration pre] 

12. program: deckaration eb 

13. 4uctch: declaration rw, 

14, "PROGRAM 245 Dee 

15. program 1.3 14 22 2.4 2.5 2.7 2.8 
3.1 3.33 3.53 3.54 3.71 3.73 3.75 
hod 64,620 Oa 5B 56d 52 

6.1 6,2 6.4 6.5 


16. START statenent:List TERM $ 

ply @ START statenent:206t TERM statenent:name $ 

18. nogram:declaration lige Sel G22. 525 
19. "PROGRAM name $ 

20. "PROGRAM name number $ 

Pl. "PROGRAM name octal:condstant $ 


22. wiogramznamne 3350 3552 B01> 5e3- DeSl. Suse 665 
es. name following ‘PROGRAM ina 
program: declaration 


2h. Aecord Sal: Bieh 3556. 3.57 Bebo 46 
25. the unit of data in a 4rle | 


; for input or output at one time 7 
26. recursive ner 


et. with respect to subroutines, one which calls 
itself, either directly or indirectly by 
calling other subroutines which call it 
in turn 


24 July 196) 131 TM-555/002/02A 


1. recursive definition 3.22 
o% definition in which an element of the definition 

is the term to be defined, perhaps indirectly 

through a chain of two or more definitions. To 

be meaningful a recursive definition must incorporate 

alternative definitions, at least one of which is 

not recursive. The recursive element then defines 

structures of arbitrary length 


3. relation: Lust 3.35 3.36 
4, dual:rekation: List 3459 
De kiteral:relatrn: List 5299 
6. numeric:relation: List 335 
T. *Nekatronal 3.35 
8, pertaining to relationships of equality or 

ordering between formulas 
9. Aekatronal:ioperator 24 3,35 3.36 
10. EQ 
ll. GQ 
le, GR 
13. LQ 
14, LS 
L5. dQ 
16. RETURN 26D 3.54 
17. “Xetuin:statenent | 3.5 2:34 5.5 
18, RETURN $ 
19. Atghtiparenthesrs 2.3 2.4 2,63 
20. ) 
21. scake 2,62 2.63 4.53 
22. number 2,02 
23. scope 6,5 
2h, sequence 4.430 4.55 
25.6 Andependent:data:sequence | 4.43 
26, Aubondinate: data: sequence > @y50 
27. parts of overlay:declarations 
28. Aequence:designator Og99: “Fes Deol dese 
29. ceLosernane 204, 
30. nog: nane 
31. statonent: nane 24 
32. switch: nane Deo! (55372 


335% Suc telr: name ($ Andex 3) 


2k 
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serial (table structure) 
table structure in which there is a 
block for each entry, all the words 
of an entry being in the same block 
SHUT 
Shut: inout: statement 
SHUT INPUT {4Lezname $ 
SHUT INPUT 4ilesname input:operand $ 
Shut: output: statement 
SHUT OUTPUT {iLezname $ 
SHUT OUTPUT {iLername output:operand $ 
Shut: statement 
Shut: input: statement 
Shut:output: statement 
SAgN 


ed 


2.2 2,61 2.62 3.71 
being preceded by + or — without 
any intervening 4paces 
signicand 
the significant digits in floating 
representations of numbers 
Aample 
in the reference, the property of a 
dtatenent of being a sample: statement 
simple: item 3.33 4.3 
data structure specified by 
sample: ctem declaration 
Sample: item: declaration 
ITEM name iten:deseription $ 
ITEM name iten:descerintion P constant $ 
ITEM name constant $ 
Adnmnle: Ltem: name 434 43 
yame following ITEM in a sunple:cten:declaration 
sample: statenent 2a Beh 3.54 3.71 
samples vartablLe Bee acl 
sample: Lten 
Single letter subscript 
Loon: vartable 


4h 


22) 


ues 


56 
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SAZOL Specification 
tablLessizezsspecrfication 
R ruunber 
V nunber 
sLash 
/ 
space 


the mark represented with no ink 
on the paper 
Apectal: compound 
BEGIN Sstatement:Lrust r44:cLause END 
Aneckfication 
basic: structure: specification 
packing: spectfication 
table: sizezspecrfication 
ALON © 
x 
OTART 
Atatenent 


complex: statement 
akternative: statement 
conditional: statenent 
dinect: statenent 
Loon: statement 
Andependent: statement 
comnound : statement 
BEGIN statement:2rust END 
4jnnte: s4tatenent 
named: statement 
wane . statenent 
statement: @r4st 
Atatenent : 
deckanation statement: lst 
directive Atatenent:List 
Statement:List declaration 
Atatenent: List directive 
Atatonent:2445t statenent 


3.6 


3.74 
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2.5 2.63 
24/4 

3.53 3.54 

3.74 3.75 

563 836531 

6.5 

3612 564 


3.15 


202 


2h July 196 134 


statenent: name 


status 
status :asscgnment: statement 

status:variabLe = status: forunla $ 
Atatussconstant — 2,63 2.8 3.32 3.51 


V (Letter) 
V (name) 
Status: formula 3,32 
status: constant 
Status: function 
status:variablLe 
status: function 
invocation of a function:declaration 
with a Status output value 
Status: tem 
d4tem specified by declaration in which the 
Atem: name is followed by S$ 
status: item: description 
S string of 4tatus:constants 
S number string of Status:constants 
status: Aton: name 
name following ARRAY or ITEM or STRING and 
followed by.S in an <tondeclaration 
Atatus List 
string of s4fatus:constants 
Status: variable 
Status: rctomn 
STOP 2 
Stop: statenent 3.4 
stop $ 
STOP statement:name § 
STRING 
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3.35 


2.61 3.32 3.36 3.51 


uo 


2.63 


3052 


3.54 
3.54 


CoD 


Vor 
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ls string 3.58 3.6 3.71 3.74 
Ce in reference to some sort of element, 

one such element or an arrangement of 

more than one with one element following 


another 
3. in strings of 44gn’ used to form 4ymbols, 
there is, in general, no separation between 
the 44gns 
4, in strings of symbols, they are separated by 
Spaces or conments 
5. string 351. 4,5 457 
6. collection of data declared by a 
string item: declaration 
To essentially equivalent to sting: ten 
but 4%7ing has the connotation of the 
roup of data 
8, sthing:item 3.32 4.5 4.57 4.58 5.31 
9. collection of data declared by. 
a strting:iten: declaration 
10, essentially equivalent to sting, but 
= AtAtng:4tem has the connotation of a 
member of the group 
11. Atting:ttem: declaration 4.57 4.58 
12, string: iteon:nane 45 
13. name following STRING in a | 
String item: declaration 
14, subordinate: data: sequence 4,55 
T5< part of an ordinary: entry: desertption 
16. subordinate: overlay:deckaration 4.55 
17. part of an ordinary:entry:descrrption 
18. subordinate: overlay: snecification 4.55 
19. part of an oAdinary:entry:desertntion 
20. subroutine 54 565 
Ole a piece of programming which can be utilized 


at various points in a program. Ina 

JOVIAL proqrzam subroutines can be set up by 

means of clodse:deckarations, function:declarations, 
and wrocedure:deckarations 
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l. subscript 


oe Andex | 3202 
Se Loon:vartablLe 22 
4, because of ambiguity it is recommended that 


this term not be used unless the meaning is 
clear from context. This is usually not the 
case since lLoop:vartables are often used 


as Andices 
De SWITCH 205 De3l 5.32 
6. suittch Be1D Sed 5031 5632 Fah 55 
Te Andex: suztch 7 
O. Lton: sunteh 
9. suittch:declaration 3553 3.175. 3676 446. Sil 553 ae 
De 
10. Andex:sucteh:declaration - 543] 
ll. 8 «©=© Atami Awitch:deckanation 5 32 
12, Audteh: Lot 5e3l 5.32 
ace Andex: switch: List | Ped! 
14. = Atems switch: List | A. A pal 
15. 4urctch: name 31D. SSeS . be9! 95532. O55 
16. name following SWITCH in a 
switch: declaration | 
17. Aynbok “Pu: (212 2,4 (2,45 2:62 2.63. 2.7 
PO 3.7L 3515. 6.3 
Ors abbreviation 2.5 
19. ‘comment 239 
20. constant LOO 
els Adeogram 255 
22. Loop:variabLe 2.5 3,74 
23%. name 2,5 
Oh, PLUENLt Lv e@ 


x 
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33. 


L3T 


TABLE 
table Sil. .3.22 


3.74 4.2 


data structure, a collection 
of <tens organized by a 
tablLe:deckaration 
table:deckaration 3.21 4h 
defined: entry: tablesdeclaration 
Like:tablLe:deckaration 
ordinary: table:declaration 
tabkLezentry 
the set of all the <tons of a table 
with the same second component of 
the 4ndex in the case of 4t1ings and 
the same index in the case of other item 
tablLe:aten 
Aten specified by a table:itendeclaration 
table: ten: declaration 
defined: entry:itemn: declaration 
ondinary: table: iten:deckaration 
string: iten:declanration 
table: ctem: name 
name following ITEM or STRING in a 
tablezitendeckaration 
table: name 3.33 3.55 3.56 3.7% 4.43 
the name, if there is one, 
immediately following TABLE in a table:decltaration 
tablLezsize 
number of entries in a table 
fable: sAzesspecrification 4.56 
R number 
Vo number 
TERM 225 
TEST 205 
Lest: sfatonent 325 
TEST 
TEST Loop:variable $¢ 
three: dimensional: constant: Lut 
BEGIN string of tuwo:dimensconal: constant: 
sListh END 
transmis s2on: code 2.6] 
pertaining to the computer- 
independent encoding of 44gns 
which is a standard for JOVIAL 


2.63 3.2 3.26 


TM-555/002/02 


3.33 
4h 
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1, thansmtsscon: code: constant 2.2 «62,63 = 3.432 
2, numnbertT (44gns) 
3. number is the number of 44gné 
4, AAansmesdsizon: code: forma i re 
Ds octal: constant 2.63 
6. transmission: code:constant 2.63 
Te transmission: code: function 
8. transmesscon: code:variabLe 
9. transmission: code: function 3.32 
10. invocation of a functton:deckaration 

with a t1ansm(s640ni Code 

output value 
ll. transmisscon: code:rten:deseription 4.4] 
12. T number 
13. transmcsdsion:code:variable 3.2 3.32 4.6 
14, transmission: code: item 
15. Atem specified by cten:declaration 


in which T follows the tten:nane | 

16. BYTE ($ index $) (transmission: code:item) 
17. truncated 3.22 
18, part removed from the left or right 
19. with nwner1ic values, if left or right is not 

stated, usually from the right 
20. with nwneiic values truncated on the right, 

care will usually be taken to insure that the 

remaining value will be the same as if the | 

computer representation were "Sign on the left 

followed by magnitude bits" | 
21. two:dunensisonal: constant: List 4o51 4.52 4.57 
22. BEGIN string of onezdunensional: 

sconstant:21414 END 
23. two:factonr: for: clause 3.74 3.77 
oh, FOR Loop:varr.able = nwnerta: formula, 

numeric: formla §$ 


25. variable 2,6. 2.61: 3... 342 3421, 3622. 3,423 
3.24 3.25 3.26 3.27 3.3 3553 Ball 
3.52 3.55 3.56 3.71 4.42 4.56 4.6 

26. boolean: variable 3.27 

OT « dual: iten 

28. entry:variable | | 3.28 

29. Literak: variable 3.2 3.26 

30. hollertth: variable 


31. transnrsds Lon: code:varsablLe 
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ds numeric:variable Sec 

26 frxeds variable 3.25 
3. fLoating :item 

4, Anteger:variable . 3,24 
De Status: tem | 
6. varttablLe:Length: table 3633). 


ie table specified by a table:declaration 
in which V follows the table:name 
or the pruntive TABLE 
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APPENDIX 


The complete specification of a procedure-oriented programming language 
seems to be a difficult task. At any rate all attempts, so far, to write 
specifications for languages as complex as JOVIAL, ALGOL, or COBOL have 

not been particularly successful. That is not to say such writeups have 
failed to please anyone. Indeed, some such descriptions have been well 
received by some workers in the field, but in each case’ there has been 

a significant segment of the computing community that has been dissatisfied. 


The author of this document is interested in knowing how close he has 
come to producing an easily understood and complete description of JOVIAL 
(J3). The following page may be torn out and returned. with an indication 
of the reader's opinions. Lengthier responses, in the form of letters, 
will be most welcome. 
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(last page) 


To; Millard H. Perstein 
System Development Corporation Room 2328 
2500 Colorado Avenue 
Santa Monica, California 


The over-all presentation of the language is: Very clear and orderly 
Clear enough for tutorial purposes Confused or confusing 


Complete but difficult to grasp Extremely garbled 


Other remarks: 


The use of the special metalanguage is: Very helpful 
An obstacle to understanding Of some value 


Other remarks: 


In comparison with other metalanguages used in describing programming 
languages (JOVIAL or others) the present one: 


Is a happy blend of brevity and clarity 
Is too long-winded Is too cryptic 


Other remarks: 


The special type face for metalanguage phrases is: Very helpful 


Not as good as special brackets A strain on the eyes 


Other remarks: 


General remarks and suggestions for improvement: 


Changes or corrections which should be issued immediately as modifications 
to this document: 


Name Position 
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To: Millard H. Perstein 
System Development Corporation Room 2328 
2500 Colorado Avenue 
santa Monica, California 


The over-all presentation of the language is: Very clear and orderly 
Clear enough for tutorial purposes Confused or confusing 


Complete but difficult to grasp Extremely garbled 


Other remarks: 


The use of the special metalanguage is: Very helpful 
An obstacle to understanding Of some value 


Other remarks: 


In comparison with other metalanguages used in describing programming 
languages (JOVIAL or others) the present one: 


Is a happy blend of brevity and clarity 
Is too long-winded Is too cryptic 


Other remarks: 


The special type face for metalanguage phrases is: Very helpful 


Not as good as special brackets A strain on the eyes 


Other remarks: 


General remarks and suggestions for improvement: 


Changes or corrections which should be issued immediately as modifications 
to this document: 


Nane Position 
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